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UN PICCOLO APPUNTO... 

La vostra rivista è molto divertente ma, 
secondo il mio modesto parare, lascia 
molto spazio troppo) al 64 dimenticando¬ 
si a volte del Commodore 128 che è sicu¬ 
ramente una macchina più versatile. Non 
mi piacciono molto i giochi e apprezzo 
molto di più le utility. Maggiori informa¬ 
zioni su funzionamento e programmi del 
128 penso interesserebbero, oltre al sot¬ 
toscritto, anche molti altri utenti. 

F. Spatola - VARESE 

Di solito noi cerchiamo di pubblicare 
molti programmi per tutti e due i compu¬ 
ter ma ovviamente dobbiamo anche tene¬ 
re conto dei suggerimenti dei lettori e del 
software a disposizione. Per quanto ri¬ 
guarda il 128, incoraggiamo quindi i pro¬ 
grammatori a inviarci quanto sviluppato. 
I nostri lettori ci sottopongono programmi 
che altrimenti avrebbero cestinato forse 
solo perché erano simili ad altri che ave¬ 
vamo pubblicato di recente. Ma se non ci 
sono errori di programmazione non ab¬ 
biate dubbi: spediteli! Per esempio abbia¬ 
mo pubblicato in uno dei numeri scorsi un 
programma per la stampa dal nome Right/ 
Side: rimane comunque il fatto che se voi 
ne possedete uno che pensiate sia migliore 
non dovete farvi scrupoli e inviatecelo, il 
massimo che vi può accadere è che non 
venga pubblicato. 


E AL DI FUORI DEI GIOCHI? 

Possiedo un 128 con drive 1571 e stam¬ 
pante MPS 803. Ho notato con disappun¬ 
to che la Commodore sembra occuparsi 
più di giochi che di utility. Le software 
house tengono in considerazione o igno¬ 
rano deliberatamente tutto quanto esuli 
dal mondo dei giochi! Mi piacerebbe 
poter vedere in circolazione più program¬ 
mi produttivi come Fleet Systems. Sareb¬ 
be meglio che le software house interpel¬ 
lassero gli utenti per sapere cosa ci piace¬ 
rebbe vedere tra le nuove uscite. 

R. Orlando - Mugnano (NA) 


Ci spiace dover ammettere che hai tutte le 
ragioni. Con l'avvento di nuovi e più po¬ 
tenti sistemi, stiamo assistendo ad un eso¬ 
do degli addetti ai lavori verso questi 
nuovi lidi. Il Commodore 64, pur avendo 
potenzialità che non hanno nulla da invi¬ 
diare ad altri computer, viene ahimè sem¬ 
pre più considerato una macchina dedica¬ 
ta esclusivamente ai giochi. Inevitabil¬ 
mente coinvolto in questo "buco nero", il 
Commodore 128 completamente compa¬ 
tibile col 64, ma che non ha troppa voce in 
capitolo per affermarsi come un sistema 
"da lavoro" come vengono invece consi¬ 
derati i PC IBM compatibili. E' dura dover 
ammettere una situazione del genere! 


COME INGANNARE 
IL VOSTRO 1571... 

Possiedo unC 128 con disk drive 1571 .Ho 
a mia disposizione diversi programmi 
specifici per il 64 con disk drive 1541. 
Esiste qualche modo per ingannare il mio 
drive in modo che pensi di essere diventa¬ 
to un 1541? 

G. Stabile - Meda (MI) 


Dopo aver acceso il monitor e il 1571, ac¬ 
cendi anche il tuo 128 tenendo premuto il 
tasto Commodore. Questo procedimento 
porta il 128 nel modo 64 e fa in modo che 
il 1571 creda di essere un 1541. Provaci e 
vedi se questa operazione ti può tornare 
utile per risolvere il tuo problema. 


SE DIMENTICATE LE SYS? 


Ho un problema con uno dei programmi 
per il mio C64. Ho dimenticato l’indirizzo 
della SYS che serve per poter avviare il 
suddetto programma. Gradirei sapere se 
esiste un modo per trovarlo. 

E. Riva - Legnano (MI) 


Il tuo è un problema molto ricorrente che, 
in alcuni casi, può essere molto difficile 
risolvere. Inizia col presumere che il 
codice della macchina carica in una delle 
locazioni più comuni. Sono il buffer per la 
cassetta all’indirizzo 828 ($33C), gli 8K 
superiori della RAM BASIC alla locazio¬ 
ne 32768 ($8000), i 4K superiori di RAM 
BASIC alla locazione 36864 ($9000) e i 
4K di RAM per le finestre alla locazione 








i lettori ci 
scrivono. 
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49152 (SCOOO). La locazione più comune 
è l'ultima citata. Carica il codice macchina 
con ,8,1 e vedi le SYS di questi indirizzi. 
Il computer potrebbe bloccarsi e dovrai 
spegnerlo e riaccenderlo. 

Se nessuno di questi indirizzi produce un 
risultato può essere per due motivi: il 
programma non carica a quell'indirizzo o 
l'indirizzo iniziale non corrisponde a 
quello finale del tuo programma. Nel pri¬ 
mo caso devi esaminare il dischetto per 
l'indirizzo di caricamento. Diversi pro¬ 
grammi lo permettono, incluso MetaBA- 
SIC. L'alternativa è di far girare un pro¬ 
gramma è di usare un disk editor che 
esamini la directory per trovare la traccia 
iniziale e il settore in cui si trova il pro¬ 
gramma. Ti porterai quindi a quel settore 
per leggere l'indirizzo per il caricamento. 
Se ancora non è quello giusto dovrai esa¬ 
minare il listing con un assembler. A volte 
il codice risiede tra il BASIC e la zona 
presidiata dalla ROM Kemal e dovrai 
quindi ricorrere al linguaggio macchina 
per rimuovere la ROM e far girare il tuo 
programma. Meno spesso, il codice pos¬ 
siede un indirizzo specifico di caricamen¬ 
to riconoscibile solo per mezzo di una rou¬ 
tine boot che, molto difficilmente, è in tuo 
possesso. In casi ancor più rari, il pro¬ 
gramma può far uso di una cartuccia 
CBM80 durante l'inizializzazione. Se la 
possiedi potresti riuscire a far partire il tuo 
programma, ma non te lo assicuriamo. 
Prova anche a richiamare la routine con 
SYS 64738 e... buona caccia!!! 

Kl 


GRAFICA CAOTICA 

Attivando il mio 128 nel modo 64 ho dei 
problemi con la grafica di molti giochi. 
Succede spesso infatti che, lanciando un 
nuovo gioco, la grafica sia normale ma 
appaiano sullo schermo dei caratteri un 
po' confusi. Il gioco funziona; il demo 
funziona; il suono è chiaro. Non si tratta 
del drive o del disco e i giochi vecchi fun¬ 
zionano a meraviglia. 

F. Frizzi - ROMA 

Da come ce lo hai descritto, il problema ci 
suona come se il chip per l'interfaccia 
video (VIC) non sia più in grado di creare 
una schermata bitmapping. I caratteri 
confusi ("garbage"= "spazzatura" in ger¬ 
go) a cui ti riferisci sono il sintomo che 
qualcosa non vada bene nel VIC perché le 
informazioni dei colori per le schermate 
sono conservate alla stessa locazione di 
memoria del testo normale. Se il software 


fornisce informazioni sui colori bitmap e 
mentre il VIC si trova ancora in modo 
testo, ti ritroverai sul monitor un pugno di 
caratteri senza senso. Ti consigliamo di 
ritornare in modo 128 e digitare il pro¬ 
gramma che segue. Al momento del lan¬ 
cio, se il tuo VIC gode di buona salute, 
vedrai una spirale bianca emergere dal 
centro di una schermata nera con sfondo 
blu. Se la causa del tuo problema è invece 
il VIC, vedrai apparire sullo schermo 
degli strani caratteri: 

10 POKE53280,6 

:POKE53281,6 
20 GRAPHIC1,1 
30 COLORI,2 
40 LX=160 :LY=100 
50 FORX=0TO400 
60 PX=160+X/4 *COS 
(X/8):PY= 
100+X/4*SIN(X/8) 

70 DRAW1,LX,LYTOPX,PY 
90 NEXT 
100 GRAPHIC0 

Per controllare il chip dell’interfaccia 
video di un 64, è necessario digitare e 
lanciare il programma CHAOS presente 
su questo ultimo numero di SuperCom- 
modore. 
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UN BUON MANUALE 

Spettabile redazione di Supercommodore 
641128, sono un vostro appassionato let¬ 
tore e vi seguo dal remoto n° 16. Leggo la 
vostra rivista perché soddisfa più di altre 
le mie esigenze ed anche perché la reputo 
come quella che tratta meglio, professio¬ 
nalmente parlando, il C64. Da alcuni 
giorni ho ripreso la programmazione e 
arrivato ad alcuni "posti di blocco" desi¬ 
dererei qualche chiarimento per andare 
avanti e riprendere a battere il program¬ 
ma: 1 ) come si possono rendere multico¬ 
lori i caratteri ridefiniti?; 2) come si può 
effettuare uno scrolling orizzontale o 
verticale di un pixel alla volta?; 3) come 
di possono convertire le immagini da 
Koala-Pointer in Doddle! e viceversa (se 
non è possibile gradirei sapere come si 
possono caricare da BASIC le immagini 
Koala)?; 4) valgono ancora le istruzioni 
per l'invio dei giochi/programmi che fu¬ 
rono pubblicate nei numeri arretrati?; 5) 
potete, infine, consigliarmi un manuale 
per la gestione della grafica e del suono? 
Spero che non cestinerete questa mia let¬ 
tera e vorrei, se possibile, che fossero 
allegati come esempi alle spiegazione dei 
programmi in BASIC. Questi miei quesiti 
dovrebbero essere di utilità generale. Sto 


cercando di formare un gruppo di pro¬ 
grammatori per Commodore 64 per rea¬ 
lizzare qualche lavoretto e magari poi 
inviarlo a qualche software house. E' 
gradito, da coloro che vorranno aderire 
al gruppo, un piccolo saggio in BASIC 
delle proprie capacità (ad esempio, effetti 
sonori, schermate grafiche, effetti specia¬ 
li, eccetera). 

Di Rocco N. - Lanciano (CH) 

Per rispondere a tutte le tue domande ci 
vorrebbero almeno dieci pagine e tre gior¬ 
ni a disposizione: non abbimo, ahinoi, nè 
le une nè gli altri, per cui, almeno per 
quanto riguarda le domande 1, 2 e 5, ti 
consigliamo di acquistare il volume 
"Grafica e Suono" edito dal nostro stesso 
Gruppo e dotato anche di dischetto dimo¬ 
strativo. Per la richiesta n° 3, corri a pagi¬ 
na 17 di questo stesso numero dove trove¬ 
rai l'articolo "Graphics Wedge" che risp- 
derà alla tua richiesta. Alla n° 4 dobbia¬ 
mo, purtroppo, rispondere con un no, in 
quanto questo è l’ultimo numero di Super¬ 
commodore... 




KORG DSS1 

Sono possessore di un Commodore 64 e vi 
scrivo questa lettere perché mi necessita 
un programma con le seguenti caratteri¬ 
stiche: campionamento, salvare i suoni 
campionati, poterli prendere uno alla 
volta o tutti quelli che necessitano e poter 
collegare al C64 una tastiera KORG 
DSS1. Esiste un programma con queste 
caratteristiche? Se si, dove posso trovar¬ 
lo e a che costo (su disco)? Vi ringraziofin 
da ora per aver letto la mia lettera e per 
un'eventuale risposta su Super Commo¬ 
dore. 

Caci A. - Licata (AG) 

E' stata realizzata una serie comprendente 
prodotti software e hardware dedicata al 
C64 come strumento musicale. Sono sta- 
terealizzate anche diverse interfacce per 
poterlo collegare alle varie tastiere, tra cui 
anche la Korg. Esiste un catalogo di tutto 
ciò, richiedibile presso la ditta: AP.EL. 
via S. Giorgio, 8 - Vimercate (MI). 

Tutti i prodotti di natura musicale dedicati 
al Commodore 64 e ad altri computer 
(Amiga, PC compatibili ecc.) fanno parte 
del catalogo Midi Magic. 
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Conosci l'informatica e il tuo C64? 


ANGELO CATTANEO 

1. Quale, tra i computer che seguono non 


dispongono della linea 

e) 

è un registro comprendente 

è stato prodotto dalla Commodore? 


supplementare IO/M negato la 


numerosi flip-flop in cui i dati 




quale, a livello basso, abilita la 


slittano dal precedente al 

a) 

Amiga 3000 


memoria convenzionale, mentre a 


successivo ad ogni ciclo di clock 

b) 

C16 


livello alto abilita una ulteriore 



c) 

Plus 4 


parte di memoria I/O 



d) 

PC128S 



7. Quando in un programma in BASIC 

e) 

C64 



viene richiamata una variabile con indice 



5. 

Nel BASIC del Commodore 64 esiste 

non 

corrispondente al dimensionamento 



una funzione di lettura memoria che forni- 

della stessa, appare il messaggio: 

2. In un sistema avente un bus degli indi- 

sce il contenuto del clock interno in ses- 



rizzi da 16 bit, qual'è il numero massimo 

santesimi di seondo. Tale variabile, divisa 

a) 

BAD SUBSCRIPT 

di dispositivi di memoria da 1 kbyte che 

per 60, fornisce i secondi trascorsi dall'ac- 

b) 

BAD DATA 

può esservi contenuto? 

censione del calcolatore o dal ripristino 

c) 

ILLEGAL QUANTITY 



delle condizioni iniziali. Qual'è detta 

d) 

OUT OF DATA 

a) 

64 

funzione? 

e) 

TYPE MISMATCH 

b) 

16 





c) 

256 

a) 

la funzione è INTEGER e il suo 



d ) 

8 


formato è INT 

8. Per cancellare un programma in BASIC 

e) 

65.536 

b) 

la funzione è JIFFY e il suo 

presente in memoria, con tutte le sue va- 




formato è SEC 

riabili, si ricorre all’istruzione: 



c) 

la funzione è POS ed il suo 



3. 

Per trovare il valore dei simboli di 


formato resta POS 

a) 

END 

CHR$ sul Commodore 64, quale istruzio- 

d) 

la funzione è TIME e il suo 

b) 

STOP 

ne è necessario dare al computer? 


formato è TI 

c) 

NEW 



e) 

la funzione è STATUS e si 

d) 

POKE49788.0 

a) 

POKE53272.X 


abbrevia in ST 

e) 

SYS52355 

b) 

SYS 52653 





c) 

PRINT ASC ("X") 





d) 

PEEK (52354) 

6. 

All'interno di un microprocessore esi- 

9. Cos'è il byte? 

e) 

PRINT PEEK (52355) 

ste un particolare registro chiamato "regi- 





stro temporaneo". A che compito è desti- 

a) 

un insieme di 64 bit 



nato tale registro? 

b) 

un insieme di 32 bit 

4. 

Si può indirizzare un maggior numero 



c) 

un insieme di 4 bit 

do locazioni di memoria e di I/O utilizza- 

a) 

è un registro che può operare in 

d) 

un insieme di 16 bit 

do la seguente tecnica di decodifica: 


modi diversi assumendo tutte le 

e) 

un insieme di 8 bit 




possibili configurazioni 



a) 

non è possibile indirizzare un 


consentite (SISO, SIPO,PIPO, 




maggior numero di locazioni di 


PISO) 

IO. All'accensione del C64, le condizioni 


memoria se non quello 

b) 

ha il compito di bufferizzare, per 

di colore del video sono: bordo azzurro. 


assegnatogli 


un tempo relativamente breve, i 

sfondo blu e cursore azzurro. Oltre allo 

b) 

selezione lineare dove i bit più alti 


dati che devono essere inviati alla 

spegnimento e all'accensione del compu- 


degli indirizzi vengono utilizzati 


ALU per farle eseguire le 

ter o premendo assieme RUN/STOP e 


direttamente come segnali di 


operazioni previste dal 

RESTORE, con quale istruzione è possi- 


selezione dei chip 


programma 

bile ottenere questa condizione iniziale? 

c) 

I/O mappato in memoria 

c) 

è un registro a cui è sufficiente un 



d) 

decodifica con comparatore 


solo ciclo di clock per inserire o 

a) 

SYS64738 


logico dove, partendo da N 


prelevare l’intera parola 

b) 

PRINTO 


ingressi d'indirizzo, viene 

d) 

ospita vari bit che, con il loro 

c ) 

POKE49355.255 


selezionata una sola area tra le 2 N 


livello logico, forniscono 

d) 

SYS53355 


aree disponibili 


informazioni specifiche sullo 

e) 

POKE53355.0 

e) 

decodifica con mappa in I/O visto 


stato del sistema o di una 




che alcuni microprocessori 


determinata parte del sistema 


Vedere le risposte a pagina 14 
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159 

PLANETE PROBE 

Volando sul vostro ship, dovrete conqui- 

stare pianeti abbattendo quanti più nemici 

potete. I tasti di direzione sono 8= su. 7= 

su/sin, 4= sin, 1= giù/sin, “= giù, 3=giù/ 

dest, 9= 

= su/dest. 

1 

POKE59468,12 

10 

REM PLANET PROBE, FROM 
NESTAR DISK 

11 

REM "IMPROOVED" BY KEN 
LAWS 

50 

DIMA$(1),B$(40) 

100 

F=0:M=1 

110 

K=3.5 

115 

W(1)=123:W(2)=108:W 
(3)=126 :W(4)=124 

120 

B=4.5 :R=2:T=1:S=1 

130 

Cl=20.5:C2=12.5 

135 

PRINTCHR$(147); 

138 

PRINT"(5 SPC}-> PLANET 
PROBE <-" 

140 

PRINT"(2 SPC}WOULD YOU 
LIKE INSTRUCTIONS"; 

142 

GOSUB2000 

144 

IFLEFT$(A$,1)<>"N" 
GOTO150 

146 

F=1:GOTO400 

150 

PRINTCHRS(19);"YOU 

WILL BE FLYING A 
SPACESHIP PAST A" 

160 

PRINT"PLANET, LIKE 

THIS ...(15 SPC}" 

170 

GOTO460 

200 

PRINTCHRS(147); 

205 

F=1 

210 

PRINT"(3 SPC}AS YOU 

CAN SEE, GRAVITY PULLS 
THE" 

220 

PRINT"SHIP TOWARD THE 
PLANET.(2 SPC}THE SHIP 
YOU" 

230 

PRINT"JUST SAW DID NOT 
GET CLOSE ENOUGH TO" 

240 

PRINT"THE PLANET TO 

GET A CLEAR PICTURE" 

250 

PRINT"OF THE PLANETS' 
SURFACE." 

260 

PRINT 

270 

PRINT"(3 SPC)YOUR 
MISSION IS TO GET 

CLOSE ENOUGH" 

280 

PRINT"TO THE PLANET TO 
GET A GOOD PICTURE." 


ANGELO CATTANEO 


290 PRINT"I WILL TELL YOU 
WHEN YOU GET A GOOD" 
300 PRINT"PICTURE." 

305 PRINT 

310 PRINT"{3 SPC)THERE ARE 
EIGHT" 

315 PRINT"ROCKETS ON THE 
SHIP" 

320 PRINT"TO HELP YOU 

GUIDE IT —>{4 SPC}7 
8 9" 

325 PRINT"{3 SPC}AS SHOWN, 
ROCKET #2" 

330 PRINT"IS ON THE BOTTOM 
AND{10 SPC}4* 6" 

340 PRINT"WILL PUSH THE 
SHIP UP." 

345 PRINT"SIMILARLY ROCKET 
#6 WILL{6 SPC}1 2 3" 
350 PRINT"PUSH THE SHIP TO 
THE LEFT." 

360 PRINT 

370 PRINT"PRESS RETURN 

WHEN YOU ARE READY TO" 
375 PRINT"TRY FLYING THE 
SHIP." 

380 GETA$ 

385 IFA$=""GOTO 380 
390 GOTO450 
400 IFF<=2G0T04 50 

405 IF F>3GOTO430 
410 PRINTCHR$(17);"YOU 

ARE DOING PRETTY WELL. 
(2 SPC}WOULD YOU" 

415 PRINT"LIKE TO TRY A 
HEAVIER PLANET"; 

420 GOSUB2000 

425 GOTO440 

430 PRINTCHRS (17); "HOW 

MANY TIMES AS HEAVY AS 
THE FIRST" 

432 PRINT"PLANET SHOULD 
THE NEXT PLANET BE"; 
434 INPUTM 

440 IFF>3GOTO450 

441 F0RJ=1T05: 

PRINTCHR$ (17): NEXTJ 

442 PRINT"YOU MIGHT ALSO 
WANT TO TRY GETTING" 

444 PRINT"YOUR SHIP IN 
ORBIT AROUND THE 
PLANET." 

446 FORJ=lTO2000:NEXTJ 
448 F=F+1:IF LEFT$(A$,1) 

="N"THEN F=2 
450 PRINTCHR$(147); 


460 Pl=l:P2=21:V1=1.3:V2=0 
470 P3=P1:P4=P2 

480 L=0: 1=1 

495 Q=32 

500 F0RJ=1T011+(SGN(F)- 

1)*2:PRINT:NEXTJ 
510 PRINTTAB(18);CHR$ 

(18);"{SH \)(2 SPC} 

{CBM *}" 

520 PRINTTAB(18);CHR$ 

(18);"{4 SPC}" 

530 PRINTTAB(18);CHR$(18) 

;"(4 SPC}" 

550 PRINTTAB(18);"(CBM 

*}";CHR$(18);"{2 SPC} 
";CHR$(146);"{SH \}" 
560 PRINTCHR$(19) 

590 G0T0755 

610 GETA$ 

620 J=VAL(A$)-1 :IFJ=-1 
THENJ=4 

630 J2 = INT(J/3)-1 :Jl=J-3* 
(J2+l)-l 

635 IFJ=4THEN700 
640 Z1=Z+J1-40*J2:Q1= 

PEEK(Zl) 

645 FORJ=lTO20:GETA$ 

:NEXTJ 

650 IFABS(P4+J2-13.5) >12 
GOTO700 

655 IFABS(P3+Jl-20.5)>20 
GOTO700 
660 POKEZ1,46 
665 FORJ=lTO30:NEXTJ 
670 Z2=Z1+J1-40*J2:Q2= 

PEEK(Z2) 

680 IFABS(P4+2*J2-13.5) > 
12GOTO700 

685 IFABS(P3+2*Jl-20.5). 

>20GOTO 700 
690 POKEZ2,46 
700 1=1 

702 IFJO4THEN710 
704 FORJ=lTO50:NEXTJ 
710 A=K*M/DÉ3:A1=A*(Cl-Pl) 
:A2=A*(C2-P2) 

720 V1=V1-.1*J1+A1:V2=V2- 
.1*J2+A2 

730 P1=P1+V1:P2=P2+V2 

735 POKEZ,Q:POKEZ1,Q1 
:POKEZ2,Q2 

755 P3=INT(P1+.5):P4 
=INT(P2 +.5) 

760 IFABS(P3-20.5)>20 
THEN900 

762 IFABS(P4-13.5)>12 
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THEN900 

780 Z=33767-40*P4+P3:Q= 

PEEK(Z) . 

782 U=1 

784 IF SGN(P1-P3)=1THEN 
U=U+1 

786 IF SGN(P2-P4)=1THEN 
U=U+2 

790 POKEZ,W(U) 

795 D=SQR((Cl-Pl)É2+ (C2- 
P2)É2) 

800 IFD>BGOTO840 
810 L=L+1 

815 IFL>1THEN830 
820 PRINTTAB(14);"GOOD 
PICTURE" 

825 IFF=1THENPRINT"N0W 

TRY TO FLY YOUR SHIP 
OFF THE SCREEN" 

830 IFD<RGOT08 60 
840 IFI>=SGOTO610 
850 1=1+1:GOTO 10 

860 PRINTTAB(18); 

"CRASH!!" 

890 GOTO950 

900 IFF=0GOTO200 

905 PRINT 

910 IFL>0THENPRINT 

TAB(17);"SUCCESS!!" 

920 IFL>0GOTO940 
930 PRINT "(4 SPCJYOU 
DIDN'T GET CLOSE 
ENOUGH TO THE” 

935 PRINT”(3 SPC}PLANET 
FOR A GOOD PICTURE" 

940 F=F+SGN(L) 

950 FORJ=1TO20:GETA$ 

:NEXTJ 

960 PRINT "(2 SPC}PLAY 
AGAIN"; 

970 GOSUB2000 
980 IFLEFT$(A$,1)="Y" 
GOTO400 

1000 PRINT"(CLR}" 

1002 F0RI=1T03:F0RJ=1T022 

1004 PRINTTAB(39*RND(1))" 

.":NEXTJ:PRINT"{HOME)" 
:NEXTI:PRINT"(HOME)(3 
CUR.GIU}" 

1005 T=200 

1006 PRINT"(10 SPCHSH N) 
(SH P}(SH 0}{SH M)(3 
SPC)(SH 

1008 PRINT"{5 SPC}<{12 CBM 
+}>{CUR.SU)(2 CUR.SIN} 
{CUR.SU}"; 

1009 FORR=lTO10 

1010 PRINT")(CUR.SIN)";:FOR 
I=lTOT:NEXT 

1012 PRINT"(SH Q}(CUR.SIN}" 
; :FORI=lTOT:NEXT 
1014 PRINT"((CUR.SIN)";:FOR 
I=lTOT:NEXT 

1016 PRINT"{SH W)(CUR.SIN)" 


; :FORI=lTOT:NEXT 
1018 NEXT 

1020 T=900:PRINT"({2 CUR. 

GIU)";:FORI=lTOT:NEXT 
1022 PRINT"{SH M)(CUR.SIN}" 
;:FORI=lTOT:NEXT 
1024 PRINT" (CUR.SU)(CUR. 

SIN)(CBM @}"; :FORI=lTO 
T:NEXT 

1026 PRINTSPC(21)"(CUR. 

GIU)";:F0RI=1T023: 
PRINT"À(CUR.SIN)"; 

1027 FORF=OTOO 

1028 PRINT" (2 CUR.SIN}";: 
NEXTI:PRINT"(CUR. 

DES}"; 

1030 PRINT"(CUR.SU) (CUR. 
GIU)(CUR.SIN)(SH M) 
(CUR.SIN)";:FORI=lTO 
T:NEXT 

1032 T=1500:PRINT">(9 CUR. 
SIN)(CUR.SU}";:FORI= 
1TOT:NEXTI 

1034 PRINT"(CBM T}{2 CUR. 
DES)(CBM T)(4 CUR. 
SIN}";:FORI=1TOT :NEXTI 
1036 PRINT"(4 CBM @}(4 CUR. 

SIN}";:FORI=lTOT:NEXTI 
1038 PRINT"{4 SPC}(CUR.SU} 
(3 CUR.DES}"; :FORI = 
1TOT:NEXTI 

1040 PRINT"(CBM @}(CUR.SIN) 
";:FORI=lTOT:NEXTI 
1042 PRINT" (CUR.GIU}(CUR. 
SIN}(CBM R)(CUR.SIN}" 

;:FORI=lTOT:NEXTI 
1044 PRINT"(CBM @}(CUR.SIN} 
";: FORI = 1TOT:NEXTI 
1046 PRINT" (CUR.GIU)(13 
CUR.SIN}";:FORI=lTO 
T:NEXTI 

1048 PRINT"{2 SPC}<(11 CBM 
+}>{13 CUR.SIN}"; 

1049 PRINT " <(10 CBM +}> 


1050 

PRINT ” 

<(9 

CBM 

+ }> 


(11 CUR. 

SIN} 

Il . 

9 


1051 

PRINT " 

<(8 

CBM 

+ }> 


(10 CUR. 

SIN} 

IT • 

9 


1052 

PRINT " 

< {7 

CBM 

+ }>{ 9 


CUR.SIN} 

tt • 

9 



1053 

PRINT " 

< {6 

CBM 

+ }>{8 


CUR.SIN} 

H . 

9 



1054 

PRINT " 

< {5 

CBM 

+ }>{7 


CUR.SIN} 

tt a 

9 



1055 

PRINT " 

<H 

CBM 

+ }>(6 


CUR.SIN} 

*1 • 

9 



1056 

PRINT " 

< {3 

CBM 

+ }>( 5 


CUR.SIN}"1057 PRINT " 
<(2 CBM +}>{4 CUR. 
SIN}"; 

1058 PRINT " <(CBM +}>{3 
CUR.SIN}"; 

1059 PRINT " 0(2 CUR. 


SIN}"; 

1060 PRINT"(2 SH Q}{2 CUR. 
SIN}"; 

1061 PRINT"(2 SH W}{2 CUR. 
SIN}"; 

1062 PRINT"(SH Q}(SH W}(SH 
Q}(3 CUR.SIN}"; 

1063 PRINT"(SH Q} (SH Q}{3 
CUR.SIN}"; 

1064 PRINT"{SH W} (SH W}(3 
CUR.SIN}"; 

1065 PRINT" ( 2 SPCMSH W}(3 
CUR.SIN}"; 

1066 PRINT"{3 SPC}(3 CUR. 
SIN}"; 

1999 G0T01999 

2000 REM INPUT ROUTINE 
SHOULD GO HERE 

2010 INPUTA$ 

2020 RETURN 



160 


BASIC SPEED-UP 64 


Se desiderate rendere più veloci i vostri 
programmi in BASIC provate ad usare 
questa corta routine e incrementerete la 
velocità di circa il 3% che può sembrarvi 
poco ma vi assicuro che, in programmi di 
una certa lunghezza, la differenza si sen¬ 
te... eccome! 


0 REM BASIC SPEED-UP 64 - 
RICHARD PENN 

10 GOSUB10000 

20 PRINTCHRS(147):POKEl, 
55 :PRINT"NORMAL BASIC 
SPEED:";:CLR:GOSUB50 

30 POKE1,53 :PRINTCHR$ 

(18)"FASTER BASIC 
SPEED:"; :CLR:GOSUB50 

4 0 END 

50 TI$="000000":FORT=l 

TO1000:A=A+1:NEXT: X 
-TI:PRINTXCHR$(157) 
"JIFFIES": RETURN 

9999 REM BASIC SPEED UP 
ROUTINE BELOW 

10000 A=65535:POKE1,55: 
POKE56334,0:POKE95, 0 : 
POKE96,160:POKE90,2 
55 :POKE91,255 

10010 POKE88,255:POKE89, 25 
5 :SYS41919 :POKEA,PEEK 
(A):POKE56334,1:POKE 
56324,149 

10020 POKE56325,66:POKE4292 
6,76:POKE42927,177:PO 
KE42928,167:POKE 


8 


SUPER COMMODORE C64/128 












42977,76 

10030 POKE42978,228:POKE 
42979,167:P0KE1, 

53:RETURN 



1 RI COME CONTROLLARE 
IL CURSORE 


30 


40 


P=54533:A$="40/80 KEY 
IS ":IFPEEK(P)=55THEN 
PRINTA$"DOWN": END 
PRINTA$"UP" 



163 


IT'S A SMALL 
WORLD SU C64/128 


36.208.250.41.83.500, 
36,208,500,41,83,750, 
41,83 

160 DATA250,41,83,1000, 
41,83,750,41,83,250, 

49.162.500.41.83.500, 
43,200 

170 DATA750,43,200,250,43, 
200,500,41,83,250,36, 
208,250,24,146,1000,30 
180 DATA245,1000,32,204, 
1500,0,0,0 


Questo corto programma per i 164 permet¬ 
te ai programmatori in BASIC di control¬ 
lare il cursore attraverso un comando di 
locazione-cursore e un comando per can¬ 
cellare il box. 

10 F0RI=679T0748:READD: 

POKEI,D:NEXT 

20 DATA32,182,2,134,176, 

32 182 2 

30 DATAI 64,176, 24,32,240, 

255.96.32 

40 DATA253,174,32, 158, 
183,96,32,167 
50 DATA2,134,177,32,182, 

2 232,134 

60 DATA178,32,182,2,134, 

179.169.32 

70 DATA166,176,164,177, 
32,210,255,232 
80 DATA228,178,208,248, 
196,179,208,1 
90 DATA96,230, 177, 166, 

177,164,176,24 
100 DATA32,240,255, 
24,144,224 
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40/80 

KEY DETECTOR 


Utilizzate il seguente programma per 
scoprire se il tasto 40/80 sia attivo o meno 
nel modo CI28. Digitatelo e fatelo girare 
dopo aver premuto il tasto 40/80. Se il 
programma non dovesse rispondere alla 
variazione della posizione del tasto pre¬ 
mete RUN/STOP RESTORE e quindi 
rilanciatelo nuovamente. Fate bene atten¬ 
zione perché il programma funziona 
esclusivamente in modo 128! 


10 SCNCLR:PRINT"IF 40/80 
•KEY IS UNDECTABLE, 
PRESS" 

20 PRINT"RUN/STOP-RESTORE 
KEYS AND RUN AGAIN." 


Con il seguente programma gli utenti di 
64 e 128 si potranno divertire ad ascoltare 
un fac-simile della canzone It's A Small 
World. 

10 PRINT"IT'S A SMALL 

WORLD":S=54272:FORSW=S 
TOS+24:POKESW, 0 :NEXT 
20 POKES+24,15:POKES+2, 
255:POKES+3,0 :POKES+ 

5,9:POKES+6,0 
30 READN1,N2,DR 

40 IFN1=0THENPRINT"THE 
END !": END 

50 POKES + 1,NI :POKES,N2: 

POKES+4,65 :FORZ=lTO 
DR-.NEXT 

60 POKES+4,64:GOTO30 
70 DATA20,169,250,21, 

227.250.24.146.500, 

41.83.500.32.204.500, 
36 208 

80 DATA250,32,204,250, 

32.204.500.30.245, 

500,30,245,500,18, 
104,250,20 

90 DATAI 69,250,21,227, 

500.36.208.500.30.245, 

500.32.204.250.30.245, 
250 

100 DATA27,148,500,24, 

146.500.24.146.500, 

20,169,250,21,227, 
250,24,146 

110 DATA500,32,204,250, 
36,208,250,41,83, 
500,36,208,250,32, 
204,250,27 

120 DATAI 48,500,36,208, 
250,41,83,250,43,200, 

500.41.83.250.36.208, 
250,24 

130 DATAI4 6,500,43,200, 

500.41.83.500.36.208, 
500,32,204,150,32,204, 
750 

140 DATA32,204,250,41, 

83.500.43.200.500, 

36.208.500.36.208, 
250,36,208 

150 DATAI 000, 36,208,750, 




SEQUENZIALI E CASUALI 

Le varie routine che seguono, accendono 
LED (con la scheda esterna) o quadratini 
sul video (in versione video) in successio¬ 
ne sequenziale o casuale. 

Sequenziali versione video 

500 A(0)=128 : Al=(64) : 

A(2)=32 : A(3)=16: 

A (4 ) =8 : A (5) =4 : A(6)+2: 
A ( 7)=1 

510 IFB>7 THENB=0 
520 POKE56577,A(B) 

530 B=B+1 
540 GOTO330 

Sequenziali versione scheda 

500 A(0)=128 : Al=(64): 

A(2)=32 : A(3)=16: 

A(4)=8 : A(5)=4 : A(6)+2: 
A(7)-1 

510 IFB>7 THENB=0 
520 POKE56577,255-A(B) 

530 B=B+1 

540 GOTO500 

Casuali versione video 

500 A(0)=128 : Al=(64): . 

A(2)=32 : A(3)=16: 

A (4)=8 : A(5)=4 : A(6)+2: 
A(7)=1 

510 B=INT(RND(0)*8) 

520 POKE56577,A(B) 

530 GOTO330 

Casuali versione scheda 

500 A(0)=128: Al=(64) : 

A(2)=32 : A(3)=16: 

A(4)=8 : A(5)=4 : A(6)+2: 
A ( 7)=1 

510 B=INT(RND (0)*8) 

520 POKE56577,255-A(B) 

530 GOTO510 
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ABC DEL BASIC 


LARRY COTTON 


In questo articolo daremo un’occhiata 
a come si gestiscono gli array multidi- 
mensionali BASIC. 

Come sicuramente ricorderete, per¬ 
ché già trattato in questa rubrica, un 
array è un metodo flessibile di espri¬ 
mere e maneggiare le variabili. Per 
l'occasione proponiamo di paragona¬ 
re gli array multidimensionali a un 
casellario nel quale i numeri che rap¬ 
presentano colori o timbri musicali 
possano essere memorizzati e pronti 
per essere usati dall'operatore. 
Diamo inizio ad un programma con il 
quale riuscirete a scegliere un nome a 
caso presente in una directory di circa 
22 e quindi premendo RETURN il 
computer comporrà il numero telefo¬ 
nico per voi! (Il programma lavora solo 
con telefoni che generano le 12 fre¬ 
quenze standard come quelli della 
AT&T quindi non col sistema ancora 
in uso in Italia). In questo sistema, che 
prima o poi dovremo adottare per 
adeguarci alle norme europee, si 
generano due toni accuratamente 
controllati. Possiamo generare gli 
stessi toni sul 64 inserendo dei valori 
di timbri musicali per ognuno dei due 
registri di controllo che generano le 
frequenze per le prime due voci del 
computer (vedi tabella). Per fare un 
esempio pratico, quando viene pre¬ 
muto il tasto 5 sentirete simultanea¬ 
mente due toni con frequenze di 770 e 
1336 Hz (periodi al secondo). Questi 
toni possono essere generati dal 64 
inserendo i numeri 87 e 49 nel registro 
di controllo di frequenza della voce 1 e 
156 e 85 nel registro di controllo di 
frequenza della voce 2. 

Ma bisonga prima di tutto sapere dove 
cercare questi valori. Come abbiamo 
già visto precedentemente in questa 
stessa rubrica, ogni tono, entro i limiti, 
può essere prodotto con il 64 se cono- 


Usate il vostro 64 
come un 
apparecchio 
telefonico digitale. 


sciamo il suo valore decimale. L’ap¬ 
pendice E della Guida all’Input che 
trovatela sempre) in altra parte della 
rivista, elenca i valori decimali per un 
vasto campo di timbri musicali che 
corrispondono a quelli prodotti da un 
pianoforte. Le frequenze dei toni as¬ 
segnate ai tasti sono stabilite da uno 
standard internazionale ma non coin¬ 
cidono con i timbri musicali standard. 
Dopo alcune ricerche sono riuscito a 
trovare una costante con la quale 
calcolare il valore decimale per ogni 
frequenza musicale. 

VALORE DECIMALE= FREQUENZA 
IN HERTZ/.0609593 

Arrotondate il risultato al numero inte¬ 
ro più vicino. Il valore decimale viene 
quindi convertito in valori di POKE 
come segue: 

SECONDO VALORE POKABILE =INT 
(VALORE DECIMALE/256) 

PRIMO VALORE POKABILE= VALO¬ 
RE DECIMALE-SECONDO VALO- 
RE * 2 5 6 

Continuando con il nostro esempio 
convertiamo 770 nel suo valore deci¬ 
male 12,631 dividendolo con la co¬ 
stante .0609593 e arrotondandolo. 
Quindi convertiamo 12,631 ai valori 
da POKare 49 e 87 dividendoli con 
256 e quindi sottraendo il resto e ci ri¬ 
troviamo con il risultato 49. 


Quindi moltiplichiamo 49 con 256 e ot¬ 
teniamo^,544 che sottriamamo a 
12,631 con risultato 87. In questo 
modo 1,336 viene convertito nel deci¬ 
male 21,916, quindi convertito ai valo¬ 
ri da POKare 85 e 156. Questi numeri 
vengono invertiti nella tavola a secon¬ 
da dell’ordine in cui vengono inseriti. 
Iniziamo il programma facendo in 
modo che la schermata venga stam¬ 
pata in blu su sfondo bianco. 

10 PRINTCHR$(147):POKE 
64 6, 6:POKE53280, 1 : 
POKE53281,1 

Quindi, giunti a questo punto, dimen¬ 
sioniamo due array in modo che corri¬ 
spondano al numero di nomi che il 
programma potrà maneggiare e al nu¬ 
mero telefonico più lungo. 

20 DIMNU$(22),D$(14) 

NU$() corrisponderà al numero tele¬ 
fonico nel formato stringa. Useremo le 
prime due delle tre voci del 64 per 
generare i toni. 

Definiamo a questo punto il loro regi¬ 
stro di frequenza. 

30 F(1)=54272:F(2)=54273: 

F(3)=54279:F(4)=54280 

Definiamo ora i registri di memoria 
che attivano e disattivano le voci 1 e 
2 del chip musicale. 

40 G=54276:H=54283 

La forma d'onda quadra simula le 
frequenze del tono. Definiamo due 
costanti per attivare o disattivare la 
forma d’onda. 

50 VN=65:VF=64 
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Figura 1. Tabella delle frequenze 
generate alla pressione di un tasto. 

Resecamo il chip sonoro, alziamo il 
volume e definiamo la grandezza del¬ 
l'onda quadra. 

60 F0RL=54272T054295: 

POKEL,0:NEXT 
70 POKE54296,15 

80 POKE 54275,8: 

POKE54282,8 

L'inviluppo è stato scelto per emulare 
i suoni prodotti da un telefono. 

90 POKE54277,20 :POKE 

54284,20 

100 POKE54278, 192 :POKE 

54285,192 

Ora passiamo alla parte più complica¬ 
ta. Compiliamo un array a due dimen¬ 
sioni POKando i valori riportati nel 
grafico di Figura 2. 

La tastiera del telefono può aiutarci a 
questo proposito: tutti e tre i tasti delle 
colonne orizzontali danno luogo a 
frequenze comuni e i tre tasti di quella 
verticale fanno altrettanto. Per esem¬ 
pio i tasti 1,2 e 3 generano la frequen¬ 
za 697; i tasti 1,4 e 7 generano invece 
la frequenza 1209. 

Prima di tutto occupiamoci delle co¬ 
lonne presenti sulla tastiera. Poiché i 
tasti telefonici 1,2 e 3 si riferiscono ai 
primi due valori di POKE 44 e 170 pos¬ 
siamo usare il loop FOR-NEXT per 
semplificare il caricamento dell’array 
con i valori riportati nel grafico. “N" cor¬ 
risponde al numero del tasto. 

120 F0RN=1T03:W(1,N)=170: 

W (2,N)=44:NEXT 

I due registri di controllo delle frequen¬ 
ze della voce 1 vengono a questo 
punto rappresentati da 1 e 2 aN’interno 
delle parentesi. Una volta fatto girare 
il loop FOR-NEXT, le variabili W(1,1 ), 
W(1,2) e W(1,3) conterranno 170, 

Figura 2. Valori da POKare. 




Equivalente 

Decimale 

1 

POKE 
voce 1 

POKE 
voce 2 

1 

697 e 1209 

11434 e 19833 

170 

44 

121 

77 

2 

697 e 1336 

11434 e 21916 

170 

44 

156 

85 

3 

697 e 1477 

11434 e 24229 

170 

44 

165 

94 

4 

770 e 1209 

12631 e 19833 

87 

49 

121 

77 

5 

770 e 1336 

12631 e 21916 

87 

49 

156 

85 

6 

770 e 1477 

12631 e 24229 

87 

49 

165 

94 

7 

852 e 1209 

13977 e 19833 

153 

54 

121 

77 

8 

852 e 1336 

13977 e 21916 

153 

54 

156 

| 85 

9 

852 e 1477 

13977 e 24229 

153 

54 

165 

94 

0 

941 e 1336 

15437 e 21916 

i_ 

77 

60 

156 

i_ 

85 


mentre le variabili W(2,1), W(2,2) e 
W(2,3) conterranno 44. 

I tasti dal 4 al 9 verranno caricati in 
modo analogo ma con frequenze di 
valore diverso. 

130 F0RN=4T06:W(1,N)=87 : 

W(2,N)=49 :NEXT 
140 F0RN=7T09:W(1,N)=153 : 

W(2,N)=54:NEXT 

II tasto dello 0 viene trattato in modo 
diverso. 

150 W(1,0)=77:W(2,0)=60 


Ora carichiamo le frequenze che cor¬ 
rispondono alle colonne con i numeri 
dei tasti. La prima colonna contiene i 





(' 

170 

44 

121 

77 


\ * 

170 

44 

156 

85 


1 3 

170 

44 

165 

94 


• 

87 

49 

121 

77 


J 5 

Keypad / 

87 

49 

156 

85 


*> \ 6 

87 

49 

165 

94 


’ 

153 

54 

121 

77 


/ * 

153 

54 

156 

85 


/ 9 

153 

54 

165 

94 



77 

60 

156 

85 v 



i 

1 

W(1,0) 

Tolto*» 1 

To\toioe 2 

m.o) 


tasti 1, 4 e 7. Usate STEP3 nel loop 
FOR-NEXT. 

160 F0RN=1T07STEP3:W 
(3, N) =121 : W (4,N) = 

77:NEXT 

Il 3 e il 4 all’interno di parentesi rappre¬ 
sentano il terzo e quarto valore della 
frequenza di controllo e controllano la 
voce numero 2. I valori di frequenza 
relativi ai tasti della seconda e terza 
colonna, vengono caricati nell'array 
seguente. 

170 F0RN=2T08STEP3 
: W (3, N) =156 : 

W (4,N)=85 :NEXT 
180 F0RN=3T09STEP3 
:W(3,N)=165 : 

W (4,N)=94:NEXT 

Anche in questo caso lo 0 viene tratta¬ 
to in modo particolare. 

190 W(3,0)=156:W(4,0)=85 

La figura 2 riporta la configurazione 
dell’array a due dimensioni caricato 
con valori da POKare. Se avessimo 
avuto a disposizione altri numeri di 
Supercommodore, avremmo spiega¬ 
to come creare una directory e com¬ 
porre un numero telefonico. 

€> Compule Puhlicatmns. Tutti i diritti sono riservati. Arti¬ 
colo tradotto dal numero di aprile di Computi 
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PROGRAMMI 


CHARLES PRINCE 


P ointer è una corta routine in 
linguaggio macchina che fa 
apparire sullo schermo una 
freccia che può essere ma¬ 
novrata tramite il joystick. Con questo 
programma potete programmare il 
vostro joystick in modo che crei delle 
applicazioni “punta e clicca” come 
quelle usate nel popolare sistema 
operativo GEOS. Finder, il secondo 
programma, dimostra come stabilire 
la posizione della freccia sullo scher¬ 
mo in modo che possiate usare al 
meglio il programma. Pointer è scritto 
interamente in linguaggio macchina e 
dovrete quindi inserire il listato usan¬ 
do MLX oppure sfruttare il programma 
già pronto registyrato sui supporti 
magnetici allegati alla rivista. Qui di 
seguito trovate, comunque, gli indiriz¬ 
zi di partenza e di chiusura qualora 
voleste personalizzare il programma: 

INDIRIZZO INIZIALE: CFOO 
INDIRIZZO FINALE: CFF7 

Seguite con attenzione le istruzioni di 
MLX e ricordatevi, una volta terminato 
di inserire il programma di Pointer, di 
salvarne una copia su disco. 

Come usare Pointer 

nei vostri programmi 

Esistono due modi per usare Pointer 
all’interno di un programma. Nel primo 
dovete aspettare che venga premuto 
il pulsante dello sparo. Questo proce¬ 
dimento può essere portato a termine 
in due diversi modi: 

100 WAIT56320,16,16 

oppure 

100 IF(PEEK(56320)AND16)= 

16THEN100 


POINTER 

Questa intelligente 
utility vi permette 
di usare il joystick 
o i mouse nei 
vostri programmi in 
BAS(,C. E' incluso 
un demo per 
aiutarvi a capire il 
funzionamento 
di questo 
programma. Per il 
64 con joystick. 


Entrambe le opzioni bloccheranno 
l’esecuzione del programma in BA¬ 
SIC fino a quando non verrà premuto 
il pulsante dello sparo. Il programma 
quindi continua normalmente. 

Il secondo metodo richiede di leggere 
la locazione del puntatore mediante 
tre semplici formule: 

X=INT(((PEEK(53262)- 
255*(PEEK(53264)= 

128))-24/8) 

Y=INT((PEEK(53263)- 
49)/8) 

SL=40*Y+X 

In queste formule, X corrisponde alla 
colonna dove si trova in quel momen¬ 
to il cursore (in un campo tra 0 e 39), 
Y alla riga (in un campo tra 0 e 24) e SL 
ad una determinata cella dello scher¬ 
mo che il cursore occupa (tra 0 nell’an¬ 


golo in alto a sinistra e 999 in basso a 
destra). Una volta compiute queste 
operazioni i vostri programmi in BA¬ 
SIC faranno tutto quello richiesto dal¬ 
l’utente nel momento in cui ha puntato 
su qualcosa e premuto il pulsante 
dello sparo. Per esempio, il joystick 
può essere usato per selezionare le 
opzioni di un menu. In questo caso 
uno spazio sullo schermo verrà asse¬ 
gnato come activating space per le 
opzioni. Quando l’utente ci clicca 
sopra il programma in BASIC trasferi¬ 
sce il controllo all'appropriata subrou¬ 
tine per eseguire l'opzione scelta. 
Può essere creata un'interfaccia stile 
Macintosh combinando Pointer con 
Looking Glass, un programma che 
aggiunge il modo finestre al Commo¬ 
dore 64. Quando i due programmi 
vengono usati assieme, quello in 
BASIC si presenta con un nuovo look 
costituito da finestre e menu a tendi¬ 
na. Pointer è stato scritto in modo da 
essere completamente compatibile 
con Looking Glass. 

Come customizzare Pointer 

Esistono diversi modi per customizza¬ 
re Pointer a seconda delle vostre 
preferenze. Potete variare il colore del 
cursore semplicemente digitando il 
comando: 


POKE53294,n 
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in cui “n" sta per il numero del colore 
desiderato. Ecco i valori per i colori: 

0 NERO 

1 BIANCO 

2 ROSSO 

3 CIANO 

4 PORPORA 

5 VERDE 

6 BLU 

7 GIALLO 

8 ARANCIONE 

9 MARRONE 

10 ROSSO CHIARO 

11 GRIGIO SCURO 

12 GRIGIO MEDIO 

13 VERDECHIARO 

14 BLU CHIARO 

15 GRIGIO CHIARO 

Per variare la forma del cursore potete 
agire sugli sprite (ricordate comunque 
che gli sprite di otto pixel per otto o più 
piccoli sono i migliori. Se usate dimen¬ 
sioni più grandi non riuscirete a sele¬ 
zionare nulla nella riga più bassa o 
nella colonna più a destra). Potete po¬ 
sizionare i dati per i nuovi sprite alle lo¬ 
cazioni 704-706, cancellando in que¬ 
sto modo i dati per gli sprite originali, o 
registrare i dati per il nuovo sprite in 
qualsiasi locazione e variare i dati del 
cursore digitando POKE 2047,b in cui 
“b” sta per il numero di blocchi nel 
quale stoccare i dati. 

Se l’immagine del nuovo sprite ha una 
grandezza che non sia di quattro pixel 
per quattro dovrete cambiare due 
registri nella routine con le seguenti 
POKE: 

POKE53101,251-YW 
POKE53146,88-XW 

“YW” corrisponde all'altezza degli 
sprite e “XW" alla larghezza (sempre 
misurata in pixel). Per esempio, per 
uno sprite con una larghezza di sei 
pixel e un’altezza di otto pixel dovete 
digitare: 

POKE53101,243 
POKE5314 6,82 


Finder 

Finder, il secondo programma, è stato 
concepito per dare una dimostrazione 
dell’uso di Pointer e per aiutarvi a 
determinare dove devono apparire gli 
oggetti sullo schermo. Finder è scritto 
interamente in BASIC e vi consiglia¬ 
mo quindi di digitare il listato usando 
The Automatic Proofreader per evita¬ 
re errori di inserimento. Una volta ter¬ 
minato ricordate di salvarne una co¬ 
pia; quindi caricatelo e lanciatelo. 
Vedrete sullo schermo il cursore nel¬ 
l’angolo in alto a sinistra e le coordina¬ 
te x e y seguite dalla posizione dello 
schermo. Per trovare la posizione di 
un punto sullo schermo usate il joy¬ 
stick per spostarvi, premete la barra 
spaziatrice per cancellare le informa¬ 
zioni sulla posizione e premete tire sul 
joystick. Premendo la lettera “Q” tor¬ 
nerete al BASIC. 

Note sul programma 

Mentre usate Pointer dovrete tener 
conto di alcune restrizioni: 

• Il vostro programma in BASIC non 
può essere usato con il numero di 
sprite 7 perché è quello usato dalla 
routine in linguaggio macchina per il 
cursore. 

• Il programma in BASIC non può 
essere memorizzato in una locazione 


che non sia 704-766, eccetto che se 
vogliate variare la forma del cursore. 

• Tutto ciò che viene memorizzato alle 
locazioni 52992-53232 influirà sulla 
routine in linguaggio macchina e po¬ 
trebbe compromettere il suo funzio¬ 
namento. 

• Se il vostro programma in BASIC 
utilizza WAIT56320,16,16 per con¬ 
trollare il pulsante dello sparo non 
potrete usare il tasto RUN/STOP du¬ 
rante l’attesa. 

Pointer lavora posizionandosi nell’in- 
terrupt hardware del computer. L’in- 
terrupt hardware fa parte del sistema 
operativo e compie 60 interventi al se¬ 
condo. Variando il vettore di interrupt 
(locazioni 788-789) per puntare su 
una nuova routine il computer leggerà 
il joystick e sposterà il cursore ogni 1/ 
60 secondi tenendo conto di quello 
che sta accadendo. Questo serve a 
dare ai programmatori in BASIC più 
memoria per lavorare poiché non 
devono includere una routine nei loro 
programmi che serva a leggere il joy¬ 
stick, controlli per vedere se lo sprite è 
uscito dallo schermo e così via. 
Pointer si prende cura di tutti questi 
dettagli. 

© Compute Publications. Tutti i diritti sono riservati. Arti¬ 
colo tradotto dal numero di giugno di Compute. 
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DIVAGAZIONI 


FRANCESCO SANTINI 


Sono un assiduo lettore della rivista, 
nonché vostro abbonato. Ho 28 anni e 
sono un possessore di un C64 ultima 
versione, equipaggiato con un disk- 
drive 1541-11, una stampante compa¬ 
tibile ed una discreta libreria di pro¬ 
grammi. 

Innanzitutto complimenti per la rivista, 
che io reputo la migliore in circolazio¬ 
ne per la macchina che possiedo. 

Mi hanno interessato molto gli articoli 
apparsi alcuni numeri fa, riguardanti il 
dibattito C64 contro Nintendo e le 
considerazioni del tipo di quelle di 
Andrea Zambonini (vedere n° 36). 
Grazie al mio lavoro (impiegato in una 
ditta aeronautica del centro Italia), ho 
avuto modo di utilizzare molti tipi di 
computer, quali PC MS/DOS, Apple 
Macintosh, stazioni CAD, mainframe 
per contabilità e per la gestione ma¬ 
gazzini. Ebbene, con questa piccola 
esperienza acquisita, posso tranquil¬ 
lamente dire che, anche con l’ausilio 
di software adeguato, tutte (o quasi) le 
caratteristiche delle macchine citate 
prima, possono essere ritrovate nel 
piccolo (ma grande) C64. 

Con la vastissima gamma di program¬ 
mi oggi disponibile, praticamente non 
c’è nulla di quello che si può fare con 
altre macchine più potenti, che non 
può essere fatto anche con il Commo¬ 
dore 64. E’ chiaro che, con soli 64K di 
memoria disponibili, non possiamo 
pretendere elevate velocità di esecu¬ 
zione dei programmi, funzionamento 
multitasking, ecc. Ricordiamoci che i 
computer con questa caratteristiche, 
dispongono di una memoria almeno 
10 o 20 volte più grande di quella del 
C64 e che il loro costo, proporzionato 
alla memoria, molto spesso, non è ac¬ 
cessibile a tutti. Analizzando bene il 
rapporto qualità-prezzo, mi sento di 
dire che il C64 è una delle macchine 


Il 64 vincerà sempre! 


più convenienti; voglio cioè dire che 
alcune caratteristiche e prestazioni di 
questo computer, difficilmente si ri¬ 
scontrano su altre macchine della 
stessa fascia di prezzo. 

Un chip sonoro (S.I.D.) da far invidia a 
tutti i PC IBM e compatibili, una risolu¬ 
zione grafica non da meno, un facile 
linguaggio di programmazione (BA¬ 
SIC 2.0) per i principianti, una vastis¬ 
sima gamma di prodotti software ed 
hardware, fanno di questa macchina 
un prodotto completo ed a buon mer¬ 
cato. 

Dobbiamo però dire che il C64 è un 
computer il cui uso è sconsigliato per 
scopi professionali, sia per la limita¬ 
tezza della memoria, che per la len¬ 
tezza delle sue periferiche (unità a 
nastro, unità a dischi e la maggior 
parte delle stampanti compatibili); 
anche se ultimamente molte case 
costruttrici hanno messo in commer¬ 
cio numerosi prodotti hardware che 
velocizzano le prestazioni della mac¬ 
china, ottenendo buoni risultati anche 
a buon prezzo. 

Resta comunque scontato il fatto che 
per usi domestici, didattici e semipro¬ 
fessionali (o professionali se non si 
hanno problemi di tempo), il C64 è la 
macchina adatta a tutti, lo personal¬ 
mente sono molto soddisfatto del mio 
C64, con lui tengo aggiornato il mio 
conto corrente in banca, gestisco il 
condominio, scrivo lettere (come 
questa) eseguo calcoli complessi, 
scrivo ogni tanto qualche programma 
e, perché no, mi diverto giocando. 
Ora ritornando al discorso C64 contro 
Nintendo (o macchine simili), provia¬ 


mo a chiederci quante delle cose pri¬ 
ma elencate riesco a fare con una 
“game machine”. La risposta è sem¬ 
plice: solo una, l’ultima, cioè il gioco. A 
questo punto mi sembra tutto chiaro: il 
C64 è sicuramente vincitore della sfi¬ 
da. Il mio personale consiglio a coloro 
che vogliono avvicinarsi per la prima 
volta al mondo dei computer o sono 
indecisi se acquistare un computer o 
una “game machine”, è sicuramente 
volto all’acquisto di un C64. 

N.d.R. E' con grande gioia che pre¬ 
sentiamo questa lettera di Francesco 
al quale va tutta la nostra comprensio¬ 
ne e sicuramente quella di tutti i nostri 
lettori proprio in questo ultimo numero 
della rivista. Voglia essere un omag¬ 
gio ad una delle più grandi macchine 
mai conosciute! 


Risposte ai quiz di 
"Conosci l'Informatica 
e il tuo C64/128?" 
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IMPORTANTE!!! 

Si sa, tutto ha un inizio e una fine ! E' proprio il caso di dirlo anche per 
quanto riguarda la nostra rivista che con questo numero chiude la 
pubblicazione apertasi sette anni fa, nel 1985 con SuperVic, quando 
il computer per tutti, come possiamo fieramente definire il Commodore 64, 
faceva il suo ingresso sul palcoscenico nazionale importato dagli States 
dove sopravvive tuttora anche se in percentuale molto più bassa 
rispetto a quella degli anni ruggenti! 
SUPERCOMMODORE C64/128 
chiude i battenti mettendo la parola fine a un capitolo che 
verrà ricordato nell'album del progresso tecnologico come un media che ha 
permesso anche a chi di computer non si interessava di entrare nel mondo 

informatico ormai in continuo sviluppo. 

Il Commodore 64 continua ancora a dire la sua come macchina da gioco 
resistendo all'avvento di computer più potenti e delle console. 

Ciò testimonia inconfutabilmente come le caratteristiche grafiche e sonore 
del C64 non siano ancora da casa di riposo come si mormora 
negli ambienti di alta aristocrazia... 

... noi ne siamo più che sicuri, tant'è vero che abbiamo in serbo 

una grossa sorpresa, 

andate un po' a vedere a pagina 45... 

Un ciao a tutti! 

LA 

REDAZIONE 
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Programmazione in l.m 

JIM BUTTERFIELD 


Un modo usuale per riuscire a raggira¬ 
re l'interrupt è di deviare il suo vettore 
(indirizzo $314/5 sul 64) in modo che 
vada a svolgere altre funzioni. Quan¬ 
do ha terminato il suo compito ritorne¬ 
rà alla routine di interrupt. Anche se 
può essere interpretato come un pre- 
interrupt, ci sta che esso agisca dopo 
la routine. 

Le routine di interrupt standard con¬ 
trollano la tastiera trasmettendo ogni 
pressione di tasti nel buffer per la 
tastiera la quale deve essere percepi¬ 
ta immediatamente , infatti in alcuni 
casi è impossibile pensar di aspettare 
un intero intervallo di interrupt (che 
corrisponde a 1/60 di secondo) prima 
di un controllo. Potete però attivare un 
postinterrupt con un preinterrupt. 
Supponete di voler stampare la parola 
LIST quando premete FI (codice di 
carattere $85). Il programma che 
presentiamo lavora solo sul 64. La 
stessa cosa può essere fatta su altri 
computer 8 bit anche se con indirizzi 
ben diversi. 

Prima di tutto scrivete una routine per 
rendere compatibile il vettore dell’in- 
terrupt al vostro particolare codice per 
il preinterrupt; quindi scrivetene uno 
simile per riattivare il vettore dell’inter- 
rupt disabilitando il programma. Il tutto 
come segue: 

033C LDA #$56 
033E LDA #$03 
0340 SEI 
0341 STA $0314 
0344 STX $0315 
0347 CLI 
0348 RTS 
0349 LDA #$31 
034B LDX #$EA 
034D SEI 
034E STA $0314 
0351 STX $0315 


0354 CLI 
0355 RTS 

Dopo di ciò scriviamo il programma 
per il preinterrupt che stabilisce un 
postinterrupt. Inserirete un interrupt 
nel listato in modo che il computer 
pensi che stia eseguento un normale 
ritorno da un interrupt: il programma 
per il postinterrupt è locato alla $0365 
e si riferisce al registro dello status per 
poter agire. 

0356 LDA #$03 
0358 PHA 
0359 LDA #$65 
035B PHA 
035C LDA #$00 
035E PHA 


Fate scattare la 
trappola prima di 
finirci dentro... 


Le tre voci interessate nello stack 
contengono ciò che ci sarebbe aspet¬ 
tato durante un normale interrupt, ma 
il computer al loro posto mette i regi¬ 
stri A, X e Y. Alla conclusione di un 
normale interrupt vengono prelevati 
sei byte dallo stack e quindi altri tre 
oltre al contenuto dei registri. 

035F PHA 
0360 PHA 
0361 PHA 

Ora vediamo il controllo delle sequen¬ 
ze di interrupt (alla locazione $EA31 ). 
Quando completo, il codice darà una 
sequenza di interrupt-return. 

Invece di tornare al punto di interrupt, 
il programma verrà attivato a partire 
dall’indirizzo $0365. 


0362 JMP $EA31 

Il codice presente alla locazione 
$0365 costituirà il postinterrupt. Se il 
contenuto del buffer non è un caratte¬ 
re salterete all’uscita alla $0380. 

0365 LDX $C6 
0367 BEQ $0380 
0369 DEX 
036A BNE $0380 

Se il carattere contenuto nel buffer 
della tastiera non è FI, il programma 
salta all’uscita. 

036C LDA $0277 
036F CMP #$85 
0371 BNE $0380 

Il registro X è stato settato a 0 nel 
codice precedente e quindi possiamo 
copiare il carattere LIST nel buffer 
della tastiera. 

0373 LDA $0383,X 
0376 STA $0277,X 
0379 INX 
037A CPX #$04 
037C BNE $0373 

Il registro X contiene ora un 4. Immet¬ 
tiamolo nel buffer all’Indirizzo $C6. 

037E STX $C6 

Ora passiamo al codice ROM nel 64 
che esegue l’interrupt vero includen¬ 
do i caratteri LIST. 

0380 JMP $EA81 

0383 4C 49 53 54 ;ASCII"LIST" 

Vi presentiamo ora la routine comple- 

(segue a pagina 19) 
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U na delle più importanti ca¬ 
ratteristiche del Commodo¬ 
re 64 sono le sue capacità 
grafiche. Possono essere 
create meravigliose immagini grazie 
all’uso dei molti programmi grafici 
disponibili sul mercato per questa 
macchina, inclusi DOODLE!, Koala- 
Painter e Cadpak, solo per ricordarne 
alcuni. Ma a guastare il tutto, sfortu¬ 
natamente sarà difficile vedere i dise¬ 
gni che avete creato per ragion i di 
incompatibilità. Per consultare il file di 
un’immagine creata con KoalaPain- 
ter, per esempio, dovete caricare e 
lanciare questo programma e quindi 
l’immagine. Dall’interno di KoalaPain- 
ter potete caricare solo immagini di 
KoalaPainter. Per caricare un’imma¬ 
gine da un’altro formato dovete lascia¬ 
re KoalaPainter e lanciare il program¬ 
ma appropriato. Graphics Wedge è la 
soluzione a questo problema, infatti è 
un corto programma in linguaggio 
macchina che vi permette di caricare 
un’immagine velocemente e facil¬ 
mente anche quelle create con diversi 
programmi grafici. 

Graphics Wedge può mostrare file 
creati con Blazing Paddles, Cadpak, 
DOODLE!, KoalaPainter, Micro lllu- 
strator e l’area Screen Magik di The 
Print Shop e l’unica volta in cui dovrete 
caricare un programma grafico è 
quando disegnate le vostre immagini. 
Graphics Wedge è soprattutto utile 
per coloro che possiedono molte 
immagini di public domain ma non il 
programma grafico necessario per 
vederle. 

Come iniziare 

Graphics Wedge è scritto interamente 
in linguaggio macchina e dovrete 
quindi inserire il listato usando MLX. 
Rispondete alle sue domande digitan- 


PHILLIP A. GILLEY 



Con questa 
potente utility 
gragica in 
I. m. per il 64, 
potrete ammirare 
sul vostro monitor 
immagini hi-res. 
Sono compatibili 
sei formati diversi. 


do i seguenti valori di starting ed 
ending: 

INDIRIZZO INIZIALE: 0801 
INDIRIZZO FINALE: 0B28 

Seguite con attenzione le istruzioni di 
MLX e prima di uscire ricordatevi di 
salvare una copia del programma su 
disco. 



Comefunziona 

Per usare Graphics Wedge caricatelo 
e lanciatelo come fareste con qualsia¬ 
si programma di BASIC, ricordiamo 
che il programma è registrato sui 
supporti magnetici allegati alla rivista. 
Graphics Wedge viene posizionato in 
un’area libera di memoria e quando 
sarà pronto per l’uso apparirà il mes¬ 
saggio READY. 

Portare su schermo le immagini è fa¬ 
cile. Prima di tutto digitate LOAD”file- 
name”,8,1 (chi possiede invece il regi¬ 
stratore deve usare la classica e 
ormai conosciuta sintassi: 
LOAD”filename”,1, 1). 

L’immagine verrà caricata in memo¬ 
ria. Ora digitate un punto e premete 
RETURN. Vedrete un elenco con il 
formato dei file compatibili con Gra¬ 
phics Wedge. Premete la lettera che 
corrisponde al formato dell’Immagine 
e questa apparirà sullo schermo. 
Durante il tempo in cui il disegno ri¬ 
marrà sullo schermo potrete variare il 
colore di sfondo e dei bordi. I tasti fi e 
f2 servono per consultare i colori di¬ 
sponibili per il bordo (fi per andare 
avanti e f2 per tornare indietro). I tasti 
f3 e f4 servono per consultare i colori 
disponibili per lo sfondo (ricordate che 
cambiare il colore di sfondo in bianco 
mentre siete nel modo multicolor può 
dar luogo a strani risultati). Quando 
avete finito di consultare il disegno 
premete un tasto qualsiasi. 

Potete a questo punto caricare e 
vedere un altro file. Se non siete sicu¬ 
ri del tipo di formato provatene uno. 
Se l’operazione fallisce caricate nuo¬ 
vamente l’immagine e provate con un 
altro formato fino a quando non riusci¬ 
rete ad ottenere dei risultati soddisfa¬ 
centi. 

© Computo PuNications. Tutti i diritti sono riservati. 
Articolo tradotto dal numero di giugno di Computo. 
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MILTON JOHNSON 


W ord Find 3D è un genera¬ 
tore di puzzle a base di 
parole capace di creare 
puzzle a due o tre di¬ 
mensioni. Questi puzzle stampano le 
parole orizzontalmente, verticalmen¬ 
te e diagonalmente nascondendole 
aH’interno di una matrice di lettere 
casuali. Ogni parola è in primo piano 
ma difficile da individuare. 

A seconda del livello di difficoltà scel¬ 
to, Word Find 3D potrà gestire da 15 a 
150 parole composte da un massimo 
di 15 caratteri. Avrete sicuramente già 
visto questi tipi di puzzle su libri o 
riviste di enigmistica. 

Nel livello 1 il programma crea un 
puzzle su 20 colonne composto da 20 
file e si potranno inserire 15 parole. In 
questo livello le parole vengono ripor¬ 
tate in otto direzioni: verso l'alto, il 
basso, a sinistra, destra, diagonal¬ 
mente verso l’alto e a destra, verso il 
basso a destra, verso l’alto a sinistra e 
verso il basso a sinistra. 

Nel livello 2 potete creare un puzzle 
tridimensionale composto da 10 puz¬ 
zle separati da 20x20. I dieci strati 
vengono collocati uno sull'altro con lo 
strato 1 in cima e il 10 in fondo. Posso¬ 
no essere inserite fino a 150 parole. 
Queste verranno immesse nei dieci 
strati nelle otto direzioni menzionate 
prima. 

Nel livello 3 il programma crea un 
puzzle a dieci strati simile a quello del 
livello 2 e si possono sempre inserire 
150 parole. A questo punto però il 
tutto diventa un po’ più complicato. Le 
parole del livello 3 vengono posizio¬ 
nate nelle otto direzioni menzionate 
precedentemente e in più in altre due: 
ascendenti o discendenti. 

Le parole che sono posizionate in 
maniera ascendente iniziano sullo 
strato più basso e si spostano verso 



FINO 3D 


Generate puzzle 
con questo ottimo 
programma 
per il C64. 


l’alto. Per esempio se viene inserita la 
parola “TORTA” in direzione ascen¬ 
dente sullo strato 10 (quello più bas¬ 
so), apparirà la lettera Y nella colon¬ 
na A, fila A e la lettera “o" sulla colonna 
A, fila A dello strato successivo (strato 
9), e così via. 

La direzione discendente funziona 
esattamente all’opposto; le parole ini¬ 
ziano dall’alto e si spostano verso il 


basso. In tutti i livelli la direzione di 
ogni parola viene scelta casualmente 
dal computer. 

Come iniziare 

Word Find 3D è scritto interamente in 
linguaggio macchina ma si carica e 
gira come qualsiasi programma in 
BASIC. Inserite il listato usando MLX 
e rispondete alle sue domande digi¬ 
tando i seguenti valori di starting ed 
ending: 

INDIRIZZO INIZIALE: 0801 
INDIRIZZO FINALE: 1900 

Prima di uscire da MLX ricordatevi di 
salvare una copia del programma. 
All’inizio del gioco apparirà la scher¬ 
mata di apertura con i tre livelli di dif¬ 
ficoltà. Selezionate il livello premendo 
1, 2 o 3. Vi verrà quindi chiesto di 
digitare una parola; inseritene una di 
al massimo 15 lettere e quindi preme¬ 
te RETURN. Le parole possono con¬ 
tenere solo le lettere dalla A alla Z 
senza spazi o punteggiatura. 



MAUI XUAU 

XOX 1 XO.TD 
XURNXOXU 
XOXDXOXO 

xoxuxono 

XOXOXVXO 
XOXOXOX J 
XOXOXOXO 
XOXOXOX H 
XOMIL TOH 
xoxoxoxs 
XOXOXOXO 
XOXOXOX* 


iSE OHI. V THE ; 

LEUEL i 



LEUEL 2 
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OH OHE LAVER 

LEUEL 3 
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Una volta che avrete inserito la parola 
premete nuovamente RETURN. A 
questo punto lo schermo diventerà 
bianco per pochi secondi per dare 
tempo al computer di generare il puz¬ 
zle sullo schermo. 

Il gioco 

Dopo che il puzzle è stato creato vi 
verrà presentata la schermata princi¬ 
pale. Sulle due linee più basse vedre¬ 
te il vostro status che indica il numero 
di parole che avete inserito, lo strato 
del puzzle sul quale vi trovate e il 
livello di difficoltà scelto. 

Nell'angolo in alto a sinistra dello 
schermo vedrete un elenco delle otto 
posizioni. 

Nella porzione dello schermo in alto a 
destra vedrete una matrice 20x20 di 
lettere in nero. Nelle vicinanze di 
questa matrice si trovano le lettere A- 
T colorate in blu. Queste lettere indi¬ 
cano le colonne e le righe e vengono 
usate per risolvere il puzzle una volta 
che sono state collocate le parole. 

Le opzioni 

Accederete alla prima opzione, Print, 
premendo la “P". Questo comando 
invia alla stampante tutti e dieci gli 
strati del puzzle seguiti da un elenco 
completo delle parole che avete inse¬ 
rito. Questo listato richiede due fogli di 
carta. Prima di iniziare a stampare 
assicuratevi che la stampante sia 
accesa. Dopo ogni parola verrà stam¬ 
pato un numero che indica in quale 
strato appare la parola nel diagram¬ 
ma. Anche gli strati vengono numera- 

xoxoxvxo 

XOXOXUXJ 

xoxoxoxo 

XOXOXOXH 
XOMIt TON 

xoxuxuxs 

xoxoxoxo 

XOXOXOXN 


MMM AUAU 



; HTfD * unph A^^rNNATO 

ti. Word Find 3D stamperà sempre un 
puzzle a dieci strati anche se sceglie¬ 
rete il livello di difficoltà 1. 

La seconda opzione è Give Up alla 
quale accederete premendo la “G”. Vi 
verrà chiesto di premere nuovamente 
la “G” se volete realmente che il puz¬ 
zle venga risolto automaticamente. 
Tutte le parole presenti nel diagram¬ 
ma verranno illuminate. 

Per accedere alla terza opzione, 
Help, premete la “H”. Questo coman¬ 
do permette di stampare un elenco di 
tutte le parole che possono essere 
trovate nello strato del puzzle. 
Premete la “U” per spostarvi verso 
l’alto di uno strato. Questa opzione 
lavora solo nei livelli 2 e 3 e viene 
usata per spostarsi da uno strato 
basso a uno più alto. Per esempio se 
vi trovate sullo strato 6 e premete la 
“U” apparirà sullo schermo lo strato 5. 
La quinta opzione, Layer Down, ri¬ 
chiede la pressione della lettera “D" e 
serve per spostarsi verso il basso di 
uno strato. 

L’accesso alla sesta opzione, Solve 
Word, avviene tramite la pressione 
della “S”. Usate questa opzione quan¬ 
do avete trovato una parola. Vi verrà 
chiesto di digitare il numero della riga 
iniziale della parola che corrisponde 
alla lettera sulla parte destra del puz¬ 
zle. Vi viene quindi chiesto di inserire 
il numero della colonna nella quale 
inizia la parola e lo troverete sulla 
parte bassa del puzzle. Se la parola 
trovata è giusta verrà illuminata. Ve¬ 
drete incrementarsi di uno il numero 
delle parole trovate. Se non è esatta il 


programma ve ne informerà. Premete 
un tasto qualsiasi per continuare. 
L’ultima opzione è Quite vi accedere¬ 
te premendo la Q. Questa opzione 
resetterà il computer. 

© Compule Publications Tutti i diritti sono riservati. 
Articolo tradotto dal numero di aprile di Compute 
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ta installata in un programma scritto 
interamente in BASIC. 

10 REM POSTINTERRUPT DEMO 

20 REM JIM BUTTERFIELD 

30 DATA169, 86, 162,3, 
120,141 

40 DATA20,3, 142,21, 3, 
88,96 

50 DATAI 69,49,162,234, 

120,141 

60 DATA2 0,3,142,21,3, 

88, 96 

70 DATA169,3,72,169, 
101,72 

80 DATAI 69,0,72,72,72, 
72,76 

90 DATA49,234,166,198, 

240,23 

100 DATA202,208,20,173, 
119,2 

110 DATA201,133,208, 

13,189 

120 DATA131,3,157,119, 
2,232 

130 DATA224,4,208,245, 
134,198 

140 DATA76,129,234,76, 
73,83 

150 DATA84 

200 FORJ=828TO902 

210 READX 

220 T=T+X 

230 POKEJ,X 

240 NEXTJ 

250 IFTO8211THENST0P 
300 PRINT"TO ENERGIZE FI: 
310 PRINT"SYS 828 
320 PRINT"TO RESTORE: 

330 PRINT"SYS 841 

© Compule Publications. Tutti i diritti sono riservati. 
Articolo tradotto dal numero di aprile di Compute. 
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SuperCommodore Clips 


a cura della Redazione 

NEWS, CURIOSITÀ' E NUOVI PRODOTTI 


Arte 

Col Commodore 
64 non si possono 
fare opere d'arte? 
Guardate un po' 
cosa sono riusciti a 
fare alcuni art pro- 
grammer di oltre 
oceano! 

Riteniamo di non 
dover usare altre 
parole in quanto le 
tre immagini si 
commentano da 
sole. 



Il futuro nel mondo 
della telefonia cellulare 

Anche in Italia, come già accaduto all'e¬ 
stero, lo sviluppo della telefonia cellula¬ 
re, o dell'autotelefono, ha superato duran¬ 
te il 1990 le più ottimistiche previsioni. E' 
stata presa alla sprovvista la stessa SIP, 
sebbene disponesse di elementi di valuta¬ 
zione realistica. Questo non è certo di¬ 
spiaciuto a nessuna delle parti in gioco: il 
gestore (nella duplice veste di fornitore 
del servizio e di principale competitor dei 
terminali d'utente), i venditori di apparec¬ 
chi, gli installatori e i produttori delle 
apparecchiature di infrastruttura e dei 
terminali d'utente. Fino a quanto durerà la 
festa? Quasi nessuno al momento si pone 
questa domanda. Non a torto; il mercato è 
in pieno sviluppo e per qualche anno 
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dovrebbe mantenere questa tendenza, 
anche se di tanto in tanto affiorano segni 
di stanchezza. Semmai caleranno i margi¬ 
ni sui prodotti che oggi sono ancora alti, a 
causa di una domanda superiore all'offer¬ 
ta. Ma lo spessore della competizione è 
tale da lasciar prevedere un calo dei prezzi 
forse più rapido di quanto avvenuto altro¬ 
ve. La prima sfida è rappresentata dalla 
compattazione degli apparecchi mobili, 
con la nascita di un vero e proprio mercato 
della comunicazione personale. Una defi¬ 
nizione di moda e un po' abusata in rap¬ 
porto a quelli che sono i prodotti classifi¬ 
cabili come tali in commercio e a quelli 
che sono gli obiettivi raggiungibili. In 
futuro, invece, saranno i prodotti e i servi¬ 
zi di personal communication a spadro¬ 
neggiare. E qui sorgono i primi interroga¬ 
tivi, uno soprattutto: quale sarà la tecnolo¬ 
gia dominante? La cellulare potrebbe non 
essere quella vincente malgrado gli ecce¬ 
zionali tassi di penetrazione messi a segno 
in questi anni. In Gran Bretagna, dove si 
cominciano a registrare segnali di stan¬ 
chezza intorno al cellulare, si punta deci¬ 
samente su una tecnologia denominata 
PCN (Personal Communication Net¬ 
works), che differisce da quella cellulare 
perché opera a una banda di frequenza 
molto elevata (1,8 GHz) e proprio per 
questi motivi tecnici i telefoni sono anco¬ 
ra più piccoli dei portatili cellulari e con¬ 
sumano di meno. Le minori distanze tra i 
differenti elementi che compongono que¬ 
sta rete (telefoni, stazioni radio base e 
centrali telefoniche) consentono un utiliz¬ 
zo più intensivo delle frequenze (rispetto 
alle reti cellulari), con benefici sui costi. Il 
governo ha già concesso licenza di eserci¬ 
zio a tre consorzi tra cui il Mercury Perso¬ 
nal Communication che ha come obietti¬ 
vo 5 milioni di utenti a fine secolo (su un 
totale di 10 milioni di utenti PCN attesi 
per allora). Per adesso, però, la Gran 
Bretagna è sola a credere nella possibilità 
di questa tecnologia che prevede investi¬ 
menti massicci nelle infrastrutture. Gli 
altri Paesi europei sono molto incerti 
mentre qualche apertura viene dagli Stati 
Uniti. Quasi tutti i Paesi europei intenzio¬ 
nati a sviluppare una strategia del mobile 
stannò invece sperimentando un'altra al¬ 
ternativa di comunicazione al cellulare, il 
Telepoint. Anche questa opzione, pre¬ 



scelta pure dalla SIP, è stata inizialmente 
proposta dalla Gran Bretagna. Attivato 
nell’agosto '89 il servizio Telepoint, che 
consente la sola attivazione di comunica¬ 
zioni in uscita, non ha tuttora mantenuto le 
promesse: i tre gestori autorizzati contano 
a tutt'oggi poco più di 5000 utenti. Il 
Telepoint, ad ogni modo, mantiene un 
discreto potenziale di sviluppo, nonostan¬ 
te l’enfasi assunta dalla PCN. Dagli svi¬ 
luppi di PCN e Telepoint ci saranno im¬ 
portanti riflessi per l'industria delle tele¬ 
comunicazioni, in particolare per il pro¬ 
dotto "core" che è la centrale telefonica 
privata. La diffusione di telefoni persona¬ 
li portatili determinerà inevitabilmente 
una domanda di centrali telefoniche an- 
ch'esse senza filo, o wireless per usare il 
linguaggio dei tecnici. E questa è una 
sfida tecnologica rilevante e impegnativa: 
per i grossi produttori potrebbe essere la 
grande opportunità attesa per il rilancio di 
un mercato maturo in quasi tutte le sue 
parti e su margini al limite della sopravvi¬ 
venza. "Gli ultimi non saranno i primi" ma 
i primi e più bravi avranno molte chance 
per vincere una partita fondamentale. 

Un altro Bell in linea 

La D&D Services ha annunciato l’uscita 
di Beli-Term per il 64. Questo programma 
viene distribuito dalla Parsec e offre un 
modo 80-colonne per il 64. Y-Modem per 
trasferimenti misti e ARC.MOD per non 
mischiare i file durante i trasferimenti. 
Tra le sue altre caratteristiche principali 
citiamo la compatibilità con la cartuccia 
SwiftLink-232 per trasferimenti veloci 
fino a 19.2K baud, un split-screen modo 
chat e una stampa ad alta risoluzione. 


L'ombra del Diavolo 

Death Adder sta tirannizzando gli abitanti 
di Yuria. Solo tre eroi come voi dispongo¬ 
no del potere di fermare questo temibile 
avversario e restituire il trono di Golden 
Axe. Tyris-Flare, una splendida e fortissi¬ 
ma amazzone è munita di una speciale 
arma che spara fiamme. Gilius-Thunder- 
head possiede una stupefacente combina¬ 
zione di potenza e agilità fisica. Axe Bat- 
tler possiede una spada gigantesca che lo 
aiuterà nella battaglia. Scegliete il perso¬ 
naggio che preferite e inviatelo a dar bat¬ 
taglia a Death Adder. 

Le armi di cui disponete sono molto po¬ 
tenti, usatele bene! Durante il gioco vi 
troverete di fronte a terribili nemici come 
Skeleton Swordsmen, Twin Brutes e Li- 
zard Women mentre cercate di trovare il 
diabolico Adder. 

Il destino degli abitanti di Yuria dipende 
dal vostro livello di abilità e coraggio. 
Visto e considerato che a volte anche la 
potenza fisica non può bastare avete a 
disposizione delle pozioni magiche che vi 
aiuteranno nell’impresa. Il gioco è distri¬ 
buito dalla Electronic Arts. 

Industriai Might & Logic 

La Lucasfilm Games ha annunciato la 
realizzazione di Night Shift che sarà pre¬ 
sto disponibile per il mercato del C64. 
Questo game arcade vi vede all’intemo di 
una fabbrica di giocattoli. Non vi sorpren¬ 
derà di certo sapere che i giocattoli in 
questione si ispirano a Guerre Stellari e 
Indiana Jones. 

La richiesta di questi giochi è talmente 
vasta che la compagnia ha bisogno di un 
nuovo operaio che riesca ad aumentare la 
produzione degli oggetti. Ma le cose non 
sembrano andare per il meglio allo sfortu¬ 
nato mercenario che si ritrova l’ingrato 
compito di riportare alla sua originaria 
gloria la ormai desolata industria. A sua 
disposizione nell’ardua impresa i Darth 
Vader, C3POs, R2D2s, Indiana Jones e 
Zak McKracken. Questo gioco un po’ in¬ 
tricato che richiede anche conoscenze del 
funzionamento dei giochi avrà di certo un 
grande successo. 
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PROGRAMMI 


KEITH CROCE 


I timer o comunque allarmi 
che segnalino molteplici 
eventi possono essere molto 
costosi, per alcuni addirittura 
inaccessibili. Ma perché comprarne 
uno quando il vostro 64 è in grado di 
farlo e in più è fornito di determinate 
caratteristiche che possono rendere 
le cose estremamente semplici? 
AlarmCALC può monitorare cinque 
eventi, ognuno con diversi orari di 
avvio e termine. Questi orari vengono 
mostrati in una tabella assieme alla 
durata di ogni tempo. Questo pro¬ 
gramma è un utile timer adatto ad usi 
generali come nella cucina o nel pro¬ 
cesso dello sviluppo fotografico. 

La tabella che mostra il display contie¬ 
ne anche un’area di memoria dove 
possono essere inseriti dei testi per 
descrivere ogni evento. 

L’allarme può essere attivato per l’ora 
d’inizio e fine di ogni evento. 

Ogni evento di allarme si manifesta 
per mezzo di un segnale sonoro e di 
un segnale luminoso lampeggiante. 


AlarmCALC 

Questo timer per il 
64 seguirà per voi 
il corso di cinque 
diversi eventi. 


guaggio macchina utilizzando il solito 
MLX e rispondendo alle sue domande 
di starting ed ending inserendo i se¬ 
guenti valori: 

INDIRIZZO INIZIALE: C083 
INDIRIZZO FINALE: C47A 

Il programma in BASIC carica quello 
in linguaggio macchina quindi ricorda¬ 
te di salvare il secondo con il nome 
ALARMCALC.ML. 


Come iniziare 

AlarmCALC è composto da un pro¬ 
gramma in BASIC e da una subrouti¬ 
ne in linguaggio macchina. 

Per evitare errori di digitazione inseri¬ 
te il programma in BASIC usando The 
Automatic Proofreader e quello in lin- 
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H E3C □ ini i Q 




Come usare AlarmCALC 

Una volta caricato il programma vi 
verrà chiesto di inserire l’ora esatta. 
Inseritela nel formato standard del 
calcolatore HH,MM,AM/PM, Per 
esempio, 10:35 della sera deve esse¬ 
re inserito nel modo 10,35,PM. Dopo 
che avrete eseguito questa operazio¬ 
ne apparirà la tabella entro la quale 
potrete memorizzare l’allarme. Il box 
attivo all’interno della tabella viene 
illuminato per poter essere notato 
istantaneamente. Può essere stabili¬ 
ta ognuna delle tre categorie di un 
evento (ora d’inizio, di fine o differen¬ 
ze orarie). Usate i tasti (+) e (-) per 
incrementare o decrementare i minu¬ 
ti; premete sempre il più o il meno 
assieme allo SHIFT per cambiare l’o¬ 
ra. Attivate l’allarme spostandovi sulla 


colonna dell’asterisco (*). Premete la 
F per attivare l’allarme solo lampeg¬ 
giante o la B per attivare l’allarme con 
il suono di un campanello. Inserite, a 
questo punto, un breve messaggio di 
riconoscimento nella colonna della 
memoria o in ogni altra colonna e 
quindi premete la Q per uscire defini¬ 
tivamente dal programma. 
AlarmCALC calcola automaticamen¬ 
te la durata di un evento, naturalmen¬ 
te questo accade una volta che avre¬ 
te inserito l’ora iniziale e finale. Con¬ 
trariamente, se inserite ogni due 
eventi l'ora finale e la durata, Alarm¬ 
CALC calcolerà automaticamente il 
terzo evento, in questo caso l’ora d’i¬ 
nizio. Questo vi permette di compiere 
le varie operazioni in modo molto 
semplice. Per esempio, supponete di 
voler cenare alle 6:18 pm e che l’arro¬ 
sto richieda un’ora e 12 minuti di cot¬ 
tura. Dovrete inserire 6:18 pm per 
l’ora finale e 1:12 per il tempo di dura¬ 
ta. L’ora d’inizio verrà stabilita auto¬ 
maticamente alle 5:06 pm. Attivate 
l’opzione Start Alarm per memorizza¬ 
re e vi verrà ricordata l’ora esatta in cui 
dovrete mettere a cuocere l’arrosto. 
Attivate l’opzione Stop Alarm e vi 
verrà ricordato di toglierlo dal forno... 
fatelo prima che bruci tutto! 

© Compuie Publìcations. Tutti i diritti sono riservati. 
Articolo tradotto dal numero di aprile di Compute 
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Amiga Magazine 

La rivisto è adatta sia aali esperti che 
ai meno esperti nell'utilizzo del com¬ 
puter Amiga. In ogni numero novità, 
consigli, recensioni e programma¬ 
zione. E 1 corredata inoltre da un flop¬ 
py disk ricco di programmi accurata¬ 
mente selezionati. 

Automazione Oggi 

Quindicinale dedicato a tutti gli aspetti 
dell'automazione industriale: dai si¬ 
stemi di gestione della produzione, al 
controllo di processo e controllo nume¬ 
rico dai robot, al CAD/CAM e ai siste¬ 
mi flessibili. 

Bit 

Il mensile di personal computing indi¬ 
rizzato ai tecnici, al "trade" e a tutti gli 
appassionati. Fornisce un' informa¬ 
zione approfondita sulle ultime novità 
del mercato e pubblica test occurati su 
prodotti hardware e software. 

Computer-*-Videogiochi 

Ogni mese C+VG presenta tutti gli 
sviluppi dell' informatica applicala al 
divertimento: home computer, conso¬ 
le, giochi da bar e realtà virtuale. E' 
inoltre una guida indispensabile alle 
nuove frontiere del divertimento non 
informatico - boord games, RPG, mu¬ 
sica e mode apocalittiche. 

Elettronica Oggi 

Quindicinale, propone servizi speciali 
su argomenti tecnici e applicativi di 
estrema attualità, presentando un'in¬ 
formazione completa su prodotti, 
nuove tecnologie, notizie di mercato, 
nei settori della componentistica e della 
strumentazione. 

EO News Settimanale 

Vero e proprio strumento di lavoro che 
affronta in sezioni verticali araomenti 
uali: microprocessori, VLSI, il mondo 
ei semicustom, CAD/CAE, aspetti le¬ 
gati alla fabbricazione e al testing di 
componenti e apparecchiature, stru¬ 
menti di misura e di laboratorio. 

Fare Elettronica 

Rivista di elettronica pratico presenta 
ogni mese una selezione di progetti, 
numerosi kit che possono essere ordi¬ 
nati attraverso la rivista, i master dei 
circuiti presentati, lo schema IV e i 
consigli TV Service, nonché un interes¬ 
sante inserto da staccare. 


Informatica Oggi Settimanale 

Il Newsmagozine di informatica Jack¬ 
son, strutturato in sezioni per fasce di 
utenza, ambienti operativi e di pro¬ 
dotto, dai mainframe al PC. Privilegia 
l'attualità e la "notizia" in assoluto, sia 
essa un nuovo prodotto o il risultato di 
una recentissima ricerca di mercato. 

Informatica Oggi & Unix 

La prima rivista italiana dedicata ai 
sistemi aperti che, raccogliendo e am¬ 
plificando l'esperienza e il know-how 
acquisiti da INFORMATICA OGGI , si 
pone come vero e proprio punto di 
riferimento per tutti coloro che opera¬ 
no nel segmento di mercato in mag¬ 
gior sviluppo di tutta l'information 
technology. 

LAN & Telecomunicazioni 

Trasmissione dati, reti Lan, modem, 
pabx e centrali, telefoni intelligenti, 
intervoice e foc-simile, costituiscono 
l'asse portante della rivista. Non man¬ 
cano gli articoli di analisi del mercato 
di settore, l'attualità e le soluzioni 
applicative. 

Laser 

Presenta bimestralmente tutte le novi¬ 
tà sull' utilizzo del laser nella realtà 
industriale. Si occupa delle lavorazioni 
meccaniche con fasci laser di alta po¬ 
tenza e delle applicazioni di fasci laser 
di bassa potenza in misure e controlli di 
processi industriali. 

Meccanica Oggi 

Ogni mese in rassegna tutta la mecca¬ 
nica: dall' idea al progetto del prodotto 
e al suo sviluppo, considerando ma¬ 
teriali nuovi e nuove tecniche produt¬ 
tive. Logistica degli impianti di pro¬ 
duzione, componentistica e subforni¬ 
tura, trattamento delle superfici e delle 
lavorazioni meccaniche, tecniche 
automatizzate, robot e macchine di 
misura. 

« 

Packaging Oggi 

Packaging Oggi, il nuovo mensile 
Jackson, riporta tutte le informazioni 
atte a soddisfare le esigenze di chi 
opera nell'industria e nella distribuzi¬ 
one con particolare riferimento ai si¬ 
stemi di imballagioe confezionamento. 

PC Magazine 

La rivista per l'utente professionale di 
personal computing. Lo prima rivista 
interamente dedicato ai sistemi MS 


DOS. In ogni numero "prove su stra¬ 
da", servizi speciali e aggiornamenti 
sull'evoluzione dei prodotti e del 
mercato. 

PC Floppy -t- PC Magazine 

E' la versione "software 11 di PC Magazi¬ 
ne. Infatti contiene mensilmente due 
floppy nei formati 5” 1/4 e 3" 1/2 con 
programmi di utilità, esempi di appli¬ 
cativi e programmi utili. 

Produttronica 

Vuole essere un preciso punto di riferi¬ 
mento per tutti coloro die operano nei 
vari settori di un comparto industriale 
tra i più complessi e innovativi.Tratta 
mensilmente, e con particolare atten¬ 
zione, sia gli aspetti tecnici, sia gli 
aspetti economici e di mercato inerenti 
la produzione elettronica. 

Quaderni di Informatica Pubblica 

Periodico edito in collaborazione con il 
Dipartimento per la Funzione Pubblica 
nel quadro delle iniziative del rag¬ 
gruppamento SOLE 24 ORE-JACKSON. 
Gli argomenti di volta in volta trattati 
saranno dedicati ai vari aspetti tecnici 
e alle normative circa l'utilizzo delle 
nuove tecnologie nell'ambito della 
Amministrazione Pubblica. 

Rivista PS/1 

E' un vero e proprio "magazine" dedi¬ 
cato ol pubblico degli utilizzatori di 
questo piccolo-grande computer IBM e 
compatibili. E' una rivista agile e 
divertente che attraverso un linguag¬ 
gio accessibile, introduce il lettore nel 
mondo del computer. 

Strumenti Musicali 

Da oltre dieci anni rappresenta il punto 
di riferimento per tutti coloro che 
operano nel settore della musica e 
delle tecnologie elettroniche d'avan¬ 
guardia applicate alla produzione e 
all'elaborazione del suono. 

Watt 

E' il quindicinale Jackson di commercio 
elettrico, illuminotecnica, installazio¬ 
ne e elettrificazione. Tutto su: merca¬ 
to, prodotti, servizi dedicati al mondo 
del commercio elettrico, dell'instal¬ 
lazione e dell'elettrificazione civile e 
industriale nel suo complesso. Mer¬ 
cato, tecnologie e normative. Bi¬ 
mestralmente, contiene l'inserto Ughi 
Design & Technology. 













NUMERI DELL'INFORMAZIONE JACKSON 


IO 

buoni motivi per 
abbonarsi 


1) Prezzo bloccato per 12 mesi. 

2) Sconto del 30% sul prezzo ciì copertina. 

3) Ricevere puntualmente e comodamente 
a casa propria la rivista sicuri di non 
perdere nemmeno un numero. 

4) Buono sconto di L. 15.000* 
per l’acquisto di 1 iOri Jackson. 

5) Diritto a ricevere la rivista 
Jackson Preview Magazine 
e il Catalogo Li bri Jackson. 

6) Possibilità di sottoscrivere e rinnovare 
telefonicamente il proprio abbonamento. 

7) Possibilità di scegliere la forma di 
pagamento più comoda (carta di credito. 



conto corrente postale, assegno bancario. 

8) Canale d'accesso preferenziale per 

informazioni tecniche. 

9) essere costantemente 
aggiornati su tutte le 
novità editoriali. 

10) Possibilità di 
scegliere lo sconto 
previsto o, in alternativa, 
l'utilissima radiosveglia 
(valore coni me re i al e 
L. 40.000). 


RIVISTE 

UJ 

PREZZO 

01 COPERTINA 

TARIFFE 

ABBONAMENTO 

CON RADIOSVEGLIA 

TARIFFA 
ABBONAMENTO 
SCONTO 30% 

AMIGA MAGAZINE (con disk) 

11 

£14.000 

£ 154.000 

£ 107.800 

AUTOMAZIONE OGGI 

20 

£7.000 

£ 140.000 

£98.000 

BIT 

11 

£7.000 

£77.000 

£ 53.900 

COMPUTER+VIDEOGIOCHI 

11 

£ 5.000 

£ 55.000 

£ 38.500 

ELETTRONICA OGGI 

20 

£ 8.000 

£ 160.000 

£112.000 

EO NEWS SETTIMANALE 

40 

£1.200 

£48.000 

£ 33.600 

FARE ELETTRONICA 

12 

£ 7.000 

£ 84.000 

£ 58.800 

INFORMATICA OGGI &UNIX 

11 

£8.000 

£ 88.000 

£61.600 

INFORMATICA OGGI SETTIMANALE 

40 

£1.200 

£48.000 

£ 33.600 

LAN & TELECOMUNICAZIONI 

11 

£ 7.000 

£77.000 

£53.900 

LASER 

6 

£ 5.000 

£ 30.000 

£21.000 

MECCANICA OGGI 

11 

£ 7.000 

£77.000 

£53.900 

PACKAGING OGGI (f numero settemmew) Il 

£ 8.000 

£88.000 

£61.600 

PC MAGAZINE 

11 

£7.000 

£77.000 

£ 53.900 

PC MAGAZINE+PC FLOPPY 

11 

£15.000 

£ 165.000 

£ 115.500 \ 

PRODUTTRONICA 

9 

£8.000 

£72.000 

£50.400 

QUADERNI DI INFORMATICA PUBBLICA 9 

£ 30.000 

£ 270.000 

£200.000 

RIVISTA PS/1 

11 

£5.000 

£55.000 

£ 38.500 

STRUMENTI MUSICALI 

11 

£7.000 

£77.000 

£ 53.900 

WATT 

20 

£1.200 

£24.000 

£16.800 


r PER ACQUISTI MINIMI DI L 100.000) 
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SUPERGAME 



Questo gioco per il 64 vi vedrà attraversare pericolose ca¬ 
verne in un mondo alieno alla ricerca dei vostri 
compagni che sono stati catturati da 
pericolose entità. E' richiesto il joystick. 


La nave da crociera Starship 
Explorer si trova nei pasticci su 
un pianeta lontano e sta a voi 
tentare di liberare l’equipaggio. 
Dovrete pilotare il vostro ship e 
farlo atterrare sulla superfìcie del 
pianeta per poi esplorare la 
roccaforte sotterranea nemica. 
Cercate di liberare i nove 
componenti dell’equipaggio 
evitando pericolosi raggi laser e 
barriere di energia. E non finisce 
qui: dovrete vedervela anche con 
i pericolosi abitanti che di certo 
non hanno preparato per voi un 
cocktail di benvenuto. E come se 
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non bastasse non potrete liberare 
tutti i vostri compagni fino a 
quando non vi sarete battuti con 
successo contro il boss di tutti gli 
alieni. 

Come iniziare 

Stronghold è scritto interamente 
in linguaggio macchina ma si 
carica e gira come qualsiasi 
programma in BASIC. Inserite il 
listato usando MLX e rispondete 
alle sue domande digitando i 
seguenti valori di starting ed 
ending: 

INDIRIZZO INIZIALE: 0801 
INDIRIZZO FINALE: 1D00 

Prima di uscire da MLX 
ricordate di salvare una copia del 
programma. Quando siete pronti 
per giocare inserite il joystick in 
porta 2, caricate e lanciate 
Stronghold. Entro pochi secondi 
apparirà la schermata dei titoli 
con il menu delle opzioni. 

Le opzioni 

Le opzioni di gioco vengono 
mostrate nella schermata dei 
titoli. La prima vi permette di 


scegliere tra un effetto gravità 
normale, alto o basso. Se siete 
dei principianti scegliete la 
gravità minima; se invece siete 
già bravi provate con la gravità 
massima. Premete FI per variare 
le condizioni di gravità. 

La seconda opzione propone di 
scegliere il numero di nemici che 
incontrerete; premete F3 per 
effettuare la selezione. Potete 
scegliere tra un numero normale, 
minore o maggiore di alieni. Se 
scegliete il numero minimo 
riuscirete a fare un po' di pratica 
come piloti. 

Dopo che avrete stabilito tutte le 
opzioni premete il pulsante dello 
sparo e comincerà il gioco vero e 


proprio. In ogni momento 
durante una partita potrete 
premere F5 per mettere la pausa 
e F7 per lasciare la partita e 
iniziarne una nuova. 

La fortezza 

Il gioco inizia con quattro piloti. 
Ne perderete uno ogni volta che 
vi schiantate e ricomincerete 
dall'inizio o dall'ultima 
piattaforma sulla quale eravate 
sbarcati. Ogni 1000 punti 
vincerete un pilota. Quando tutti i 
piloti sono stati persi subentrerà 
il game over. Premete il pulsante 
dello sparo per iniziare una 
nuova partita. 

La fortezza è suddivisa in due 
livelli con 32 schermate ognuno. 
Potete navigare attraverso tunnel 
e caverne o sopra terreni rocciosi. 
Manovrate lo ship in tutte le 
direzioni usando il joystick. 
Premete fire per sparare. 

Quando arrivate alla fine di una 
schermata apparirà quella 
successiva. Mentre esplorate la 
fortezza incontrerete molti 
oggetti. Alcuni di questi possono 
essere delle piattaforme bianche e 
corrispondono all'unico posto sul 
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quale potete sbarcare dallo ship. 
Come già spiegato è sempre 
meglio atterrarvi di tanto in tanto 
mentre proseguite nella 
roccaforte nemica. Potrete 
incontrare anche dei raggi laser 
che fanno fuoco a intervalli 
regolari. Prendete bene i tempi 
prima di passare e sarete salvi. 

Vi capiterà anche di incontrare 
dei box di sicurezza colorati. Per 
trarre vantaggio da questi codici 
colorati toccateli con il vostro 
ship. Molte volte durante una 
partita vedrete che il vostro ship 
è contornato da una barriera di 
sicurezza. Potete passare 
attraverso questa barriera solo 
quando il suo colore è uguale al 
vostro. Se non lo fate dovrete 
cercare un box di sicurezza dello 
stesso colore. 

1 vostri compagni sono nascosti 
in due livelli della fortezza. 
Quando ne avvistate uno non vi 
resta che toccarlo e verrà 
automaticamente trasportato 
sano e salvo nello ship. Nella 
parte bassa dello schermo si 
trova un display in cui viene 
mostrato il numero di uomini che 
dovete ancora liberare. Ogni 


volta che ne troverete uno vi 
verranno dati 250 punti. Se per 
sbaglio gli sparate non riceverete 
punti. Prima o poi vi imbatterete 
negli alieni che assomigliano a 
dei molluschi e che strisciano al 
suolo accanto a voi: attenzione 
che possono anche entrare nelle 
caverne. Se gli sparate moriranno 
all'istante e vi verranno elargiti 
ben 50 punti. 

La fortezza di ghiaccio 
Una volta completato il primo 
livello entrerete nella fortezza di 
ghiaccio. Qui la grafica diventa 
più dettagliata e il labirinto di 
catacombe più complesso. 
Quando arrivate a questo livello 


la vostra barriera di sicurezza 
viene resettata e solo quando 
uscirete dal livello verrà riportata 
al suo colore originario. 

Questo livello è molto difficile da 
completare: i passaggi sono 
stretti e i nemici vi attendono 
nascosti in posti che neanche 
immaginate lontanamente. 
Quando trovate tutti e sei i codici 
di sicurezza raggiungete la 
schermata finale e troverete i 
resti della Starship Explorer. Il 
boss alieno si sposterà da un lato 
all’altro dello schermo a guardia 
dell’ultimo uomo da salvare. Per 
riuscire a evitarlo dovrete 
concentrarvi molto e avere dei 
riflessi molto pronti. In questa 
fase finale, non dovrete usare 
solo la violenza allo stato brado 
per distruggere il temibile alieno 
ma dovrete usare un briciolo di 
materia grigia. 

Se per caso non avete liberato 
tutti e nove gli uomini non vi 
resta che fare dietro front e 
cercare quelli che mancano. 

Una volta portata a termine la 
missione, tornate all'inizio del 
primo livello sulla piattaforma e 
avrete in tasca la vittoria. 
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S ul mondo cibernetico di Thraxx è 
tornato Havok. Dopo diecimila anni di 
pace, la Spada di Fuoco, fonte del 
potere degli antichi Cavalieri della 
Spada, si è frantumata. La notte di¬ 
venta rossa dalle fiamme e il popolo 
della Città Inferiore cade sotto l'assal¬ 
to delle mostruose creature di Havok. 
Impotenti, i Cavalieri della Spada 
muoiono con il loro popolo. Solo uno 
del loro Ordine riesce a scampare alla 
tremenda catastrofe: Hiro. 

Nel gioco tu sei Hiro, l'ultimo dei Cava¬ 
lieri, un guerriero tecnologico armato 
di astuzia, silenzio e di un potente 
braccio cibernetico riprogrammabile. 
Devi penetrare nella Città Inferiore e 
ricomporre i sedici frammenti della 
Spada di Fuoco. Solo allora potrai 
affrontare Havok e vendicare la fine 
della tua gente. Devi guidare Hiro il 
Cavaliere della Spada attraverso il 
labirinto della Città Inferiore, alla ricer¬ 
ca dei 16 frammenti della Spada di 
Fuoco. Una volta che li avrai raccolti 
tutti la devi usare per battere Havok e 


porre termine così al suo regno di 
terrore e di tirannia. 

Il programma visualizza soltanto le 
zone dello schermo che Hiro ha già 
passato nel gioco in corso e in questo 
modo risulta un'avventura arcade 
auto-carteggiata. 

In questo labirinto sotterraneo vi 
sono diverse stanze e passaggi 
nascosti, per cui è consigliabile esplo¬ 
rare ogni uscita sospetta. Per visualiz¬ 
zare una zona appena scoperta, ba¬ 
sta semplicemente farci andare Hiro e 
questa rimane visibile per tutto il resto 
della partita in corso. Quando l’indica¬ 
tore della vitalità va a zero perderete 
una vita e tutti i modificatori della po¬ 
tenza di lotta di Hiro si resettano ed 
egli perde l'arma corrente. La perdita 
di una vita, inoltre, procura a Hiro due 
secondi di invulnerabilità. Se Hiro non 
sta combattendo corpo a corpo, un 
piccolo indicatore sulla destra fa ve¬ 
dere quanti proiettili gli rimangono. 
Quando tutti proiettili sono stati spara¬ 
ti, Hiro ritorna a combattere corpo a 
corpo. A rendere più eccitante il gioco, 
si presentano i numerosi bonus che 
potrete raccogliere durante la partita. 
Siete assetati di vendetta e sicura¬ 
mente riuscirete nella disperata e 
pericolosa impresa!!! 
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S upremacy è un gioco dedicato ai 
fanatici di strategia/simulazione che 
offre la possibilità di lottare per il 
dominio economico e militare di quat¬ 
tro sistemi planetari. Come coman¬ 
dante siete personalmente responsa¬ 
bile delle risorse, dell’acquisto degli 
equipaggiamenti, del governo, dello 
sviluppo di strategie militari e via di 
seguito. Quattro comandi alieni, 
ognuno in ogni sistema planetario, 
tenteranno di sconfiggervi. Il vostro 
scopo principale è di distruggerli tutti e 
quattro conquistando le loro basi. E' 
richiesta una buona dose di strategia 
sia perché siete comandanti di un 
esercito che dell’economia. Dovrete 
prendere anche decisioni morali. Riu¬ 
scirete ad evitare di portare la vostra 
gente alla morte, di tassarla o sacrifi¬ 
carla alle forze aliene al solo scopo di 
mantenere il potere? Riuscirete ad 
essere governanti buoni che si pren¬ 
dono cura della salute e del benestare 
della sua gente? Ma bando alle ciance 
e passiamo al gioco vero e proprio. 
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In avvio di gioco dovrete scegliere 
quale livello eseguire. Facendo clic 
sull'icona View Opponent (Vedi Av¬ 
versario) potrete chiamare i particola¬ 
ri biografici essenziali dei quattro dit¬ 
tatori alieni; una volta selezionato l'a¬ 
lieno che volete sfidare cliccate sul 
pulsante Challenge (Sfida) per entra¬ 
re nel suo sistama e iniziare la batta¬ 
glia. Se sfidate Wotok giocherete nel 
sistema a 8 pianeti Hitotsu; sfidate 
Smine per entrare nel sistema a 16 
pianeti Futatsu; se affrontate Krart 
andate a dare battaglia nel sistema a 
32 pianeti Mittsu; oppure se vi sentite 
davvero temerari, sfidate Rorn nel suo 
sistema a 32 pianeti Yottsu. 
Qualunque sistema sceglierete per 
giocare, la vittoria la otterrete cattu¬ 
rando la base del vostro avversario. 
Hitotsu è la più facile: avete bisogno 
solo di Crediti per acquistare oggetti, il 
nemico non ha molta esperienza e il 
sistema è composto solo da otto pia¬ 
neti. In Futatsu, Mittsu e Yottsu il 
nemico diventa progressivamente più 


forte e più scaltro. I problemi di gestio¬ 
ne delle risorse sono molto maggiori. 
La Mappa Sistema animata della vi- 
deata principale indica i pianeti del 
sistema. Cliccando sulle frecce a 
destra del visualizzatore, il Cursore 
Pianeta si sposta su e giù sulla map¬ 
pa. Sulla Finestra Video a destra 
appare una veduta del pianeta corren¬ 
te, mentre il colore del cursore cambia 
per indicare chi tra voi e il vostro avver¬ 
sario ne è al controllo. Se il pianeta 
non è stato ancora formattato, allora 
nessuno ne ha il controllo e il cursore 
rimane in grigio. 

Il concetto di pianeta corrente è molto 
importante in Supremacy. Alcuni dei 
controlli del gioco funzionano solo sul 
pianeta corrente e in genere, affinché 
funzionino, il pianeta deve essere in 
vostro possesso. 

Tutti i messaggi in arrivo appaiono 
sulla finestra testo scorrevole alla 
base della Videata Principale e se il 
messaggio arriva mentre siete in 
un'altra videata, il bordo dello scher¬ 


mo lampeggia per avvertirvi. 
Supremacy è stato progettato e scritto 
originariamente su un altro Commo¬ 
dore, Amiga e il manuale principale 
era stato redatto per descrivere il 
gioco e i suoi controlli cosi come 
apparivano su quella macchina. 

Nella conversione al C64 i program¬ 
matori hanno apportato alcuni cam¬ 
biamenti. Il soggetto e il gioco sono 
rimasti gli stessi, qualunque sia la 
macchina usata, come pure funzio¬ 
nalmente identica è l’interfaccia uten¬ 
te di "punta-e-clicca", anche se nella 
grafica sono state apportate un paio di 
modifiche. Ma anche se il manuale 
principale è stato redatto per la versio¬ 
ne Amiga non dovete preoccuparvi, la 
sua utilità rimane intatta. Leggetelo 
attentamente per trarne il massimo 
vantaggio, chi lo sa, con un po' di 
pratica potreste riuscire a battere 
Rorn e a conquistare il controllo del 
sistema Yottsu! 
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I nsector Hecti, l'insettore che in que¬ 
sto game rappresenta il primo detec¬ 
tive computerizzato de! mondo, è 
stato inviato su Interchange, poiché il 
terribile Victor Virus e la sua banda di 
scalmanati hanno invaso questa 
sensibilissima area e, manco a dirlo, 
adesso tocca a te rimettere le cose a 
posto! Non è certo una passeggiata! 
Come facilmente intuibile, sei l'inset- 
tore Hecti e devi darti da fare per 
liberare tutte le cin¬ 
quanta aree dell'ln- 
terchange riallinean¬ 
do i blocchi di giun¬ 
zione e, allo stesso 
tempo, ripulire l'area 
da Victor e dalla sua 
scatenata banda. 

Sarai aiutato nel posi¬ 
zionare i blocchi da 
un segnale acustico 
che ti avverte quando 
sono nella posizione 
corretta. Natural¬ 
mente, i nemici (in 
questo caso i bacilli) 
non sono tutti uguali: 
ognuno di loro ha il 
suo modo particolare 
nel muoversi: studia 
questi modi con at¬ 
tenzione altrimenti 
potrebbe essere la 
tua fine. Non essere 
pessimista! Anche tu 
non sei un novellino, 
infatti, il tuo arsenale 
è ben rifornito di armi 
tra cui puoi attingere. 

La più importante è 
The Ball, un’arma a 
rimbalzo di portata 


limitata ma che distrugge ogni bacillo 
che tocca: per attivarla non devi fare 
altro che muoverla verso la direzione 
in cui intendi lanciarla e poi premere il 
tasto "tire" del joystick. La puoi usare 
una alla volta e il suo numero è limita¬ 
to: però, ogni tanto vengono teletra¬ 
sportati dei nuovi rifornimenti. Implo¬ 
rar è un oggetto che viene teletraspor¬ 
tato e raccogliendolo distruggi tutti i 
bacilli presenti in quell'interchange; 
Shield ti offre buone chance in quanto, 
raccogliendolo, puoi distruggere tutti i 
bacilli semplicemente andandogli 
addosso; attento però poiché la sua 
durata è limitata. Stasis, invece, con¬ 
gela tutti i bacilli su un interchange ma 
ha un effetto di breve durata, perciò il 
contatto con i bacilli è da evitare in 
quanto potrebbe essere letale. Per 
finire parliamo di Speed-up che ti 
consente di muoverti più rapidamen¬ 


te: anche questo, però, come i due 
precedenti dura solo per un breve 
periodo. Alcune di queste armi sono 
teletrasportate dal Dipartimento Armi 
Speciali al Quartier Generale (HQ). La 
sfida è molto interessante e divertente 
ed ogni area va ripulita in un certo pe¬ 
riodo di tempo; nel caso in cui riesci a 
ripulirla più rapidamente del tuo pre¬ 
decessore, ti verrà notificato. Se vai 
fuori tempo massimo o urti un bacillo, 
o peggio ancora, cadi fuori dall’area e 
perdi, logicamente, una delle cinque 
vite disponibili. Quando non hai più 
vite puoi, volendo, riavviare il gioco 
entro quattro aree dall’area più lonta¬ 
na che hai raggiunto usando i codici di 
accesso ottenuti ogni cinque livelli 
superati. 

Bene, credo di aver reso abbastanza 
l'idea di quello che ti aspetta! Adesso 
sta a te, Insettore Hecti! 
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1 


2 


3 






- 


8 


9 


i. 
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SILKWORM IV 

THUNDER BLADE 
SUPER WONDER BOY 
RAMBO 3 
TURRICAN II 

DYNAMITE DUX 
TURBO OUT RUN 
TEENAGE M.H. TURTLES 
SHADOW OF THE BEAST 
R-TYPE 


KStorm 

U.S. Gold 

U.S. Gold 

Hit Squad 


Rainbow 

Arts 


U.S. Gold 


Kixx 


Image 

Works 


Ocean 
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GUIDA ALL'INPUT 
DEI PROGRAMMI 


programmi in BASIC listati su SUPERCOM- 
MODORE contengono una particolare codifica dei 
caratteri di controllo (cursore, colore, reverse, ecce¬ 
tera) che permette di ottenere una maggiore leggibi¬ 
lità dei programmi. 

Generalmente, questi listati contengono alcuni ca¬ 
ratteri racchiusi tra parentesi graffe {}; queste ultime, 
che non esistono sulla tastiera del computer, non 
devono essere digitate, ma hanno unicamente lo 
scopo di indicare che i caratteri da esse racchiusi 
sono dei caratteri di controllo. 

Ad esempio {GIU'} indica che occorre premere una 
volta il tasto di cursore verso il basso, {3 GIU'} 
indica che il tasto di cursore verso il basso dovrà 
essere premuto tre volte. 

Se tra le parentesi graffe è racchiuso un singolo 
carattere, quest’ultimo deve essere premuto insie¬ 
me al tasto CTRL (ad esempio, incontrando {A} si 


dovrà premere il tasto CTRL insieme al tasto A). 
Invece i caratteri racchiusi tra parentesi quadre e 
simboli di maggiore e minore [< >] devono essere 
premuti unitamente al tasto Commodore (nell'ango¬ 
lo inferiore sinistro della tastiera). 

Ad esempio, [<A> ] indica che deve essere premuto 
il tasto Commodore insieme al tasto A. 

Infine, alcuni caratteri racchiusi dalle parentesi graf¬ 
fe preceduti dalle lettere SH: ciò indica che il caratte¬ 
re seguente deve essere digitato tenendo premuto il 
tasto SHIFT. 

La tabella seguente riporta, per ogni carattere di 
controllo, la codifica utilizzata nei nostri listati. 

I listati in linguaggio macchina (totalmente numerici) 
non possono invece essere copiati direttamente con 
il computer, ma richiedono l'utilizzo dello speciale 
programma MLX, riportato, insieme alle istruzioni per 
il suo utilizzo, in altra parte della rivista. 
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PROGRAMMI 



I tile relativi offrono caratteristi¬ 
che molto vantaggiose come 
l'alta velocità e maggior effi¬ 
cienza in confronto ad altri tipi 
di file a disposizione per la memoriz¬ 
zazione dei dati su supporto di massa. 
Grazie ad un accesso casuale, gli 
inserimenti individuali in un file relati¬ 
vo possono essere letti, scritti, ag¬ 
giunti o rimpiazzati a piacere. Poiché 
la maggior parte del lavoro di proces¬ 
sing viene gestito dal DOS (Disk 
Operating System), i file relativi sono 
meno soggetti ad errori. Infatti solo 
eseguendo sul computer comandi 
manuali è possibile gestire questo 
versatile tipo di file. Il BASIC 2.0, in 
questo caso, non ci aiuta molto. 

La gestione di file relativi con l'ausilio 
degli unici comandi BASIC 2.0 DOS è 
noiosa e può intimidire i meno esperti. 
Molti programmatori posti di fronte ai 
file relativi preferiscono evitarli come 
la peste bubbonica. Ma è un peccato 
perché i file relativi sono forse la carat¬ 
teristica più potente e affascinante del 
DOS Commodore. La Commodore 
sembra aver capito dove sta il proble¬ 
ma visto e considerato che tutte le 
macchine dopo il C64 presentano 
comandi DOS che semplificano enor¬ 
memente l’uso dei file relativi. Relati¬ 
ve Ease offre queste caratteristiche 
anche ai programmatori su 64. 

Come iniziare 

Relative Ease è scritto interamente in 
linguaggio macchina. Per introdurre il 
listato usate MLX e rispondete alle 
sue domande digitando i seguenti 
valori di starting ed ending: 

INDIRIZZO INIZIALE: C000 
INDIRIZZO FINALE: C2AF 

Seguite attentamente le istruzioni di 


JEFFREY D. PARTCH 


RELATIVE 

EASE 

I file relativi, a 
dispetto della loro 
potenza, velocità e 
flessibilità sono 
sempre stati difficili 
da programmare su 
C64 ed è per questa 
ragione che la 
maggior parte dei 
programmatori li 
hanno sempre 
evitati. Relative Ease 
rivoluziona il tutto 
rendendo questo 
tipo di file molto 
facile da usare allo 
stesso modo di un 
file sequnziale o pro¬ 
gramma. Per il 64 
con disk drive 1541, 
1571 e 1581. 


MLX e ricordate di salvare una copia 
del programma su disco una volta 
finito di digitare il listato. Quindi carica¬ 
te il programma usando la sintassi: 

LOAD-RELATIVE EASE",8,1 


Quando appare la parola READY 
dovrete semplicemente digitare SYS 
49152 per attivare l'utility e alcuni 
importanti contatori BASIC. Se desi¬ 
derate usare Relative Ease all'interno 
di un programma in BASIC ricordate 
che la routine iniziale resetta tutte le 
variabili. 

I file relativi 

Un file relativo non è niente più che 
una locazione espandibile di blocchi 
che non vengono utilizzati o di settori 
su disco. 

Ogni blocco dispone di 254 byte per la 
memorizzazione di dati. Il DOS asse¬ 
gna questi blocchi ai file relativi per¬ 
mettendogli di crescere. 

I settori laterali sono speciali blocchi 
unici dei file relativi. Ogni settore 
ospita un contatore di blocchi per 120 
byte doppi che permettono al DOS di 
collocare velocemente i vari blocchi 
assegnati al file. Sei settori possono 
essere assegnati ad un singolo file 
relativo e quindi, in teoria, un file rela¬ 
tivo può espandersi fino ad includere 
720 (6x120=720) blocchi di memoriz¬ 
zazione primari più sei settori di bloc¬ 
chi addizionali per un totale di 726 
blocchi. Comunque, il 1571 è limitato 
ad un massimo di 658 blocchi di 
memorizzazione primari perché i di¬ 
schi a faccia singola non contengono 
mai più di 664 blocchi (664-6=658). 

Record e lunghezze 

Gli inserimenti individuali in un file re¬ 
lativo vengono chiamati record e un 
singolo file relativo può essere espan¬ 
so fino ad includere 65.535 registra¬ 
zioni. Nella maggior parte dei casi il 
numero sarà probabilmente più bas¬ 
so. Il numero di record per ogni file 
viene determinato dai limiti dello spa¬ 
zio su disco e dalla lunghezza delle 
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registrazioni. 

La lunghezza dei record corrisponde 
al numero massimo di caratteri che è 
possibile contenere in ogni registra¬ 
zione. Il valore viene assegnato al file 
dal DOS quando viene creato. 

Il DOS permette che la lunghezza dei 
record non sia minore di 1 carattere e 
maggiore di 254. Ad ogni record nel 
file viene assegnata la stessa lun¬ 
ghezza dal DOS. 

Noterete che esistono tre valori di 
lunghezza che il DOS non accetterà: 
42,58 e 63. Ciò accade perché questi 
numeri hanno rappresentazioni 
ASCII e "?") con speciali signi¬ 
ficati per il DOS. Se li usate per sba¬ 
glio vi ritroverete semplicemente con 
un SYNTAX ERROR. 

Vi presentiamo un corto programma 
in BASIC che calcola il massimo 
numero possibile di record per ogni 
file. Per usarlo dovete inserire il nu¬ 
mero di blocchi liberi su disco e la lun¬ 
ghezza del record che intendete poi 
usare in seguito. 

20 BF=664:PRINT"NUMBER OF 

BLOCKS FREE";BF; 

30 POKE211,21:INPUTBF: 
IFBF>664THENBF= 

664 

40 INPUT"RECORD LENGHT" 

;RL:IF{SPACE}RLClORRL 
>254THEN40 
50 SS=INT((BF/120) 

+.99):BA=BF-SS 
60 RP=INT(BA*254/RL) 


:IFRP> 

65536THENRP=65535 
70 PRINT"{RVS}THERE 

ARE";RP;" 

{LEFT}RECORDS 

POSSIBLE.{SPACE}" 

Settori e formati 

Nella maggior parte dei casi i record 
possono essere suddivisi in lunghez¬ 
ze più piccole chiamate "field". I settori 
possono avere lunghezza fissa o 
variabile. 

Diciamo per esempio che il record del 
programma per l'indice di una rivista 
contiene i seguenti settori: (1) Nume¬ 
ro., (2) Data, (3) Titolo, (4) Articolo, (5) 
Pagina e (6) Tema. 

Con un settore di lunghezza variabile 
ogni campo viene separato da un 
delimitatore che può corrispondere a 
una virgola o un punto a capo. L'unica 
restrizione è che la lunghezza totale di 
tutti i settori, inclusi i delimitatori, non 
deve eccedere la lunghezza del re¬ 
cord stesso. 

Usando la lunghezza di settore fissa, 
il programmatore puù riservare un 
determinato numero di byte per ogni 
field. Per esempio, possono essere 
riservati 5 byte per il numero della 
rivista, 6 byte per la data, 20 byte per 
il titolo e così via. Ogni campo deve 
essere separato da un delimitatore. Il 
vantaggio di questo metodo è che la 
locazione di ogni campo inizia sempre 
dalla posizione 6, il campo del titolo 
alla posizione 12 e il campo per l'arti¬ 


colo alla posizione 32. 

Ogni metodo ha i suoi vantaggi e 
svantaggi. La decisione sta a voi ma è 
sempre meglio studiare i record in 
modo che INPUT# possa essere 
usato per leggere le informazioni. 

GET# e INPUT# 

Record e settori vengono ripristinati 
usando statement GET# o INPUT#. 
GET# rispristina semplicemente i 
caratteri uno alla volta e non riconosce 
i delimitatori. I programmi che usano 
GET# necessitano l'assemblamento 
manuale di tutte le stringhe e il control¬ 
lo dei delimitatori. L'uso di INPUT# è 
più veloce e semplice di GET# perché 
ripristina intere stringhe e riconosce i 
delimitatori automaticamente (virgo¬ 
le, due punti e punti a capo). Una cosa 
importante da ricordare circa INPUT# 
è che la lunghezza delle stringhe non 
deve eccedere gli 88 caratteri. 

Tre nuovi comandi 

Tutti i comandi forniti da Relative Ease 
accettano sia variabili che argomenti 
letterali al posto di determinati para¬ 
metri. Gli argomenti delle variabili 
devono essere del tipo e valore giusto 
per il comando. I parametri opzionali 
possono essere omessi dalla sintassi 
del comando ma tutti i parametri ne¬ 
cessari devono apparire nell'ordine 
giusto. Il primo comando di Relative 
Ease è DOPEN. 

DOPEN viene utilizzato per creare file 
relativi e per aprirli. Al contrario di altri 
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tipi di file, quelli relativi vengono aperti 
per lettura e scrittura simultanea. Il 
computer permette che dieci file ven¬ 
gano aperti ogni volta ma il DOS per¬ 
mette l’accesso ad un solo file relativo 
per drive. 

Poiché i file sequenziali vengono 
spesso usati in congiunzione a file 
relativi, il comando DOPEN fornisce 
un buon numero di parametri opziona¬ 
li per abilitare questi tipi di file. La 
sintassi completa è la seguente: 

DOPEN#/fr), "filename, type ", L record- 
lenght, Udevicenumber, W 

Il parametro "Ifn" può essere rimpiaz¬ 
zato con un determinato numero di file 
logici nel campo 2-255. "Filename" 
deve corrispondere a una stringa va¬ 
lida di al massimo 16 caratteri (evitate 
di inserire punteggiatura o caratteri di 
controllo). Il parametro "type” segnala 
al DOS un determinato tipo di file (S 
per sequenziale, P per programma, R 
per relativo). Normalmente il DOS è 
indifferente al tipo di file quando i file 
sono stati aperti per la lettura. 

Il parametro "recordlenght" dice al 
DOS quanti caratteri deve contenere 
ogni record del file. I limiti sono di 1 e 
non più di 254 caratteri per record 
(sempre con l’eccezione di 42, 58 e 
63). La decisione iniziale è vostra ma 
una volta che avrete stabilito la lun¬ 
ghezza del record questa non potrà 
essere più variata se non con un pro¬ 
cedimento molto complicato. Questo 
parametro deve essere incluso per 
creare un nuovo file relativo. 

Il parametro "devicenumber" vi per¬ 
mette di specificare un disk drive alter¬ 
nativo. I valori devono essere in un 
campo di 8-30. Il valore di default del 
comando DOPEN è il numero di unità 
8 se non altrimenti specificato. 

Il parametro "W" dice al DOS che un 
nuovo file deve essere aperto per 
scrivere. Il tipo di file normale è il 
sequenziale ma file programma pos¬ 
sono essere aperti se specificati dal 
parametro type. Questo parametro 
non viene inteso per essere usato con 


file relativi (che vengono creati usan¬ 
do il parametro L discusso prima). 

Si può accedere ai record attraverso il 
DOS usando il comando RECORD. 

RECORD#/#?, recordnumber, character- 
position 

Lo stesso numero di file logico usato 
per aprire un file relativo deve rim¬ 
piazzare il parametro "Ifn" in questo 
comando. Il secondo parametro, "re¬ 
cordnumber", accetta ogni valore en¬ 
tro i limiti 1 -65.535. Il valore dipende a 
seconda di quale record intendete 
trattare. 

Il terzo parametro, "character-posi- 
tion" permette di posizionare un con¬ 
tatore di record alla locazione di un 
determinato carattere. Per usare que¬ 
sto parametro dovete specificare una 
lunghezza di campo fissa. Questo 
procedimento è opzionale nella mani¬ 
polazione di file relativi. Il valore di 
default è 1, il primo carattere presente 
nel record. 

L’ultimo comando è DOLOSE che 
dona maggiore flessibilità del norma¬ 
le comando CLOSE. Sono possibili le 
seguenti varianti: 

DOLOSE 

DOLOSE ON Udevicenumber 
DCLOSEmn 

DCLOSE#lfn ON Udevicenumber 

La prima variante chiude tutti i file in 
quel momento aperti sul drive numero 
8. La seconda variante ha la stessa 
funzione ma sul drive che specificate 
con "devicenumber". La terza varian¬ 
te chiude un determinato numero di 
file logico (Ifn), il quale era aperto al 
numero di unità 8 e la quarta variante 
chiude il numero di file e permette di 
specificare il disk drive. 

Come interpretare il canale Errar 

Relative Ease trae vantaggio delle 
funzioni USR, di solito poco usate, per 
fornire una simulazione della variabi¬ 
le DS$ trovata in versioni superiori del 
BASIC Commodore. Le seguenti va¬ 


rianti sono molto utili: 

PRINT USR(devicenumber) 
DS$=USR(devicenumber) 

IF VAL (USR(devicenumber))=50T 
HEN... 

Questa funzione legge il canale errar 
del disk drive specificato da "device¬ 
number" e riporta la stringa per il pro¬ 
cessing. Poiché la condizione disk 
errar viene cancellata ogni volta, è 
sempre meglio memorizzare la strin¬ 
ga in una variabile e trattarla in segui¬ 
to. L'equivalente numerico per un 
messaggio d'errore può essere otte¬ 
nuto con la funzione "VAL". 

Per i file relativi possiamo riscontrare 
tre condizioni di errore: 

50, RECORD NOTPRESENT 

51, OVERFLOW IN RECORD 

52, FILE TOO LARGE 

L'errore numero 50 indica che il DOS 
non è riuscito a trovare il record richie¬ 
sto. Se riscontrate questo tipo di erro¬ 
re mentre state creando un nuovo file 
non vi resta che ignorarlo. Durante 
un’operazione di scrittura questo erro¬ 
re è valido solo quando non desidera¬ 
te l'espansione; altrimenti questo er¬ 
rore è semplicemente una conferma 
che l’espansione è avvenuta. Durante 
un’operazione di lettura questo errore 
indica che il contatore del record è 
stato premuto dopo la fine del file. 
Questo errore non è comunque un 
metodo affidabile per controllare l’ulti¬ 
mo record valido. 

L'errore numero 51 indica che più dati 
sono stati inviati al record di quanti 
possa sostenere e che l'informazione 
è stata troncata. Per evitare questo 
tipo di errore controllate la lunghezza 
delle stringhe di output prima che 
vengano inviate al drive. Ricordate 
anche di includere un punto a capo 
nella lunghezza del vostro record. 
PRINT# invia un punto a capo alla fine 
di ogni stringa. 

L'errore numero 52 indica che non è 
rimasto più spazio su disco. Questo 
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errore si rileva solo durante la creazio¬ 
ne di un nuovo file o durante l'espan¬ 
sione di uno già esistente. 

Un'altra condizione d'errore, 70, NO 
CHANNEL ,00,00, si presenta quan¬ 
do più di un file relativo viene aperto su 
un determinato disk drive o quando 
aprite un file con una lunghezza di 
record 42, 58 o 63. 

Come creare un nuovo file 

Prima di poter creare un file relativo 
dovete conoscere la lunghezza del 
vostro record e avere un'idea genera¬ 
le del numero di record che vi neces¬ 
sitano. Scegliere quindi un numero 
approssimativo di record è importante 
per diverse ragioni. Prima di tutto 
perché al DOS serve un determinato 
lasso di tempo per creare nuovi record 
e lo risparmierete se determinerete un 
numero in precedenza. Seconda ra¬ 
gione è che sicuramente esiste un 
adeguato ammontare di spazio a di¬ 
sposizione su disco. Terza e più im¬ 
portante, un certo numero di blocchi 
deve essere assegnato ad un file pri¬ 
ma che funzioni nel modo giusto. 

Il seguente programma crea un nuovo 
file relativo usando i comandi di Rela¬ 
tive Ease. Prima di farlo girare ricorda¬ 
tevi di caricare Relative Ease. 

10 PRINT"(CLR) {RVS} 
CREATE A NEW 
RELATIVE FILE" 

20 DOPEN#2,"ERROR 
FILE",L22,U8 


30 RECORD#2,29,1 
40 PRINT#2,CHR$(255) 

50 DS$=USR(8):DS=VAL 

(DS$): 

IFDS>0ANDDS<>50THEN 

PRINTDS$ 

60 DOLOSE 

Il file viene creato dalle linee 20-40. La 
linea 20 apre il file, la linea 30 fa 
avanzare il contatore del record fino 
all'ultima registrazione e la linea 40 
scrive il valore CHR$(255) al record 
finale. 

CHR$(255) è il valore usato dal DOS 
per inizializzare o segnare l'inizio di un 
nuovo record. In questo caso ogni 
record nel file viene inizializzato e 
locato il necessario numero di blocchi 
al file. 

Il DOS non colloca mai meno di un 
blocco intero in un file relativo e crea 
spesso tanti record quanti sono i bloc¬ 
chi che conterrà. 

Per esempio, nel programma qui 
sopra la linea 30 istruisce il DOS per 
creare 29 record di 22 caratteri ognu¬ 
no, ma in effetti, vengono creati 34 
record. Ecco il perché: 22 caratteri x 
29 record = 638 byte. Ogni blocco può 
contenere 254 byte, quindi tre blocchi 
vengono inseriti nel file. Tre blocchi (o 
726 byte)/22 caratteri = 34 record 
completi. Il numero di record extra si 
incrementa mentre la lunghezza dei 
blocchi si decrementa e viceversa. 
Non vengono creati record addiziona¬ 
li se la lunghezza della stringa è mag¬ 


giore di 127 caratteri poiché solo un 
record completo può stare in un singo¬ 
lo blocco. 

La linea 50 legge il canale error e 
stampa il messaggio d'errore quando 
necessario. L'errore numero 50 viene 
ignorato perché in questo caso è 
scontato: stiamo scrivendo in un re¬ 
cord che non esiste perché nessun 
record è presente in un nuovo file 
relativo. 

Come scrivere un file relativo 

Una volta che un file relativo è stato 
creato su disco può essere aperto con 
o senza il parametro della lunghezza 
del record, L. Il comando RECORD 
viene usato per locare un particolare 
record e il comando BASIC 2.0 
PRINT# viene usato per scrivere al¬ 
l'interno del file. Il seguente program¬ 
ma riapre il file che abbiamo prima 
creato e registra diversi messaggi 
d'errore BASIC nei primi 29 record. 


10 

PRINT"{CLR7 (RVS) 

WRITE A 

RELATIVE FILE" 

20 

DOPEN#2,"ERROR FILE", 
L22,U8 

30 

S=41373:ERR$="":ER= 
ER+1 

40 

Y=Y+1:V=PEEK(S+Y) 

50 

ERR$=ERR$+CHR$ 

(VAND127) 

60 

IFV<12 8THENG0T04 0 

70 

RECORDI2,ER:GOSUB500 

80 

PRINT#2,ERR$:GOSUB500 
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90 IFER<29THENGOTO30 
95 DOLOSE:END 

500 DS$=USR(8):DS=VAL(DS$) 

501 IFDS=0ORDS=50 
THENRETURN 

502 PRINTDS$: DOLOSE : END 

La linea 20 riapre il file. La linea 30 
cancella la stringa d'output e aggiorna 
il contatore del record. Le linee 40 e 50 
assemblano ogni messaggio d’errore 
nella stringa d’output e la linea 60 
controlla la fine di ogni messaggio. La 
linea 70 posiziona il contatore del 
record e controlla se ci sono errori su 
disco. La linea 80 invia la stringa d'out¬ 
put al drive e controlla se ci sono 
errori. La linea 90 reinserisce tutti i 29 
record. Per finire, la linea 95 chiude il 
file quando avete terminato. 

Come leggere un file relativo 

Il seguente programma legge casual¬ 
mente vari inserimenti dal vostro file. Il 
comando INPUT# viene usato perché 
non esiste nessun conflitto potenziale 
nel semplice formato del record (que¬ 
sto programma viene usato nuova¬ 
mente nel prossimo paragrafo quindi 
inseritelo attentamente). 

10 PRINT"{CLR} {RVS} READ 
RECORDS BACK" 

20 DOPEN#2,"ERROR 
FILE",U8 

30 EN=0:ERR$="" 

40 INPUT"ENTER A RECORD 
NUMBER";EN 

50 IFEN=0THENDCLOSE: END 
60 RECORD#2,EN,1 
70 GOSUB500:IFDS=50THEN90 

80 INPUT#2,ERR$:IFERR$= 
CHR$(255)THEN90 

81 PRINT"(UP)ERROR 
NO."+STR$ 

(EN)+"IS - ";CHR$(34) ; 
ERR$;CHR$(34) 

89 GOTO30 

90 PRINT"(UP)(RVS)ERROR 
MESSAGE"; 

EN;"(LEFT)IS NOT ON 
FILE" 

91 GOTO30 


95 DCLOSErEND 

500 DS$«USR(8):DS=VAL(DS$) 

501 IFDS=0ORDS=50 
THENRETURN 

502 PRINTDS$:DCLOSErEND 

La linea 20 riapre il file. La linea 30 
cancella il contatore di record e la 
stringa di input. La linea 40 inserisce 
un valore di record e lo conserva nella 
variabile EN. La linea 50 permette di 
lasciare il programma digitando uno 0 
o premendo il RETURN quando ri¬ 
chiesto. La linea 60 posiziona il punta¬ 
tore del record e la linea 70 controlla 
se ci sono errori. Sulla linea 80 il 
record viene ripristinato e verrà inseri¬ 
to un testo particolare per i record 
inutilizzati. La linea 81 viene eseguita 
quando non è apparso nessun disk 
error ed è stato ripristinato un record 
valido. In questo caso il record di testo 
viene formattato e mostrato sullo 
schermo. La linea 90 viene eseguita 
quando si incontra l’errore numero 50 
o quando un record inutilizzato viene 
ripristinato. In questo caso appare 
sullo schermo il messaggio RECORD 
NOT ON FILE. In ogni caso il loop 
principale viene reinserito. 

Aggiornamenti e modifiche 

A questo punto potreste essere molto 
confusi da tutto quello che abbiamo 
finora detto. Prima di tutto abbiamo 
aperto il file, l’abbiamo scritto e quindi 
chiuso. Quindi abbiamo riaperto il file, 
lo abbiamo letto e richiuso. La cosa 
importante è che in realtà non lo ab¬ 
biamo ancora chiuso del tutto. Una 
volta che il file relativo è stato aperto 
questo può essere modificato e riletto. 
Per una dimostrazione aggiungete le 
seguenti linee al precedente pro¬ 
gramma. 

10 PRINT"(CLR)(RVS)MODIFY 
RECORDS" 

81 PRINT"(UP)MODIFY 
RECORD" 

+STR$(EN)+CHR$(32); 

82 CP=PEEK(211):PRINT" 

(2SPACES}";ERR$;: 


POKE211,CP 

83 MOD$="":INPUTMOD$: 

IFMOD $ = ""THENMOD$ = 

CHR$(255) 

84 IFLEN(MOD$)<22THEN86 

85 PRINT"(UP)(RVS)STRING 
TOO LONG ERROR - 21 
CHARS MAX (DOWN)": 
GOT081 

86 RECORD#2,EN,1 :GOSUB500 

87 PRINT#2,MOD$:GOSUB500 

88 RECORD#2,EN,1 :GOSUB500 

90 PRINT"(UP)(RVS)ERROR 
MESSAGE";EN;"{LEFT} 

IS NOT ON FILE" 

91 PRINT"ENTER NEW RECORD" 
; :G0T083 

Le linee 81 e 82 formattano uno state¬ 
ment di input con la strìnga sulla de¬ 
stra. La linea 83 registra la stringa 
modificata nella variabile MOD$ e 
controlla se era stata cancellata. In 
questo caso, CHR$(255) viene regi¬ 
strata nel record ad indicare che ora è 
inutilizzata. La linea 84 determina se 
la nuova lunghezza va bene per il 
record. Se così non è apparirà un 
messaggio d'errore. Dalla linea 86 
inizia la vera azione. 

La linea 86 stabilisce il puntatore del 
record. Sulla linea 87 il record modifi¬ 
cato viene memorizzato nel file e sulla 
linea 88 viene ristabilito il contatore. 
Questo è un passo molto importante 
più difficile da spiegare che da com¬ 
piere. Ricordate sempre la posizione 
del puntatore del record sia prima che 
dopo l'aggiornamento di un record. La 
linea 91 permette ai nuovi record di 
essere riempiti o creati quando si in¬ 
contra un record inutilizzato o un erro¬ 
re numero 50. 

A questo punto abbiamo trattato tutti 
gli argomenti importanti, come creare 
un file, scrivere record, leggerli o 
modificarli. Il procedimento può es¬ 
servi sembrato semplice in questo 
esempio ma lo è sicuramente anche 
quando vi accingerete a creare record 
di vostra invenzione. 

C Compute Publications. Tutti i diritti sono riservati. 
Articolo tradotto dal numero di maggio di Compute 
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Arriva 

la realtà virtuale 

Marshal M. Rosenthal 

Un tema affascinante che apre nuove prospettive 
nel mondo microludico. Chi di voi ha visitato 
l'ultimo SMAU ha potuto constatarlo di persona. 



P overo Marshal. Costretto 
ad abbandonare l'eccitante 
Las Vegas Convention 
Center, senza tempo per 
mangiare, afferrando un taxi in mezzo 
ad una folla di assalitori con la mede¬ 
sima intenzione, passando davanti a 
ristorante dopo ristorante (ma non era 
l'Hard Rock Cafe?) e tutto perché la 
Psygnosis ha preferito esporre i propri 
prodotti in un hotel invece che in fiera. 
Marshal finisce all’Alexis Hotel, non 
uno di quelli che è facile attraversare, 
con ascensori e cose simili, NOOOO, 
è uno di quelli piuttosto eleganti co¬ 
struiti attorno ad un campo da golf. 
Lo stomaco di Marshal ruggisce, 
Marshal ha la nausea, Marshal trova 
finalmente la porta giusta: è chiusa. 
Marshal vuole andare a casa o alme¬ 
no trovare un bar. 

Ebbene, che ha a che fare tutto questo 
con la realtà virtuale? Ci arriviamo: 
quaranta minuti più tardi il nostro 
uomo si trova a divorare con gli occhi 
la nuova linea di prodotti Psygnosis, 
trangugia la sua sesta tazzina di high- 
test (caffè nero, saturo di caffeina), 
sono solo le 11 antimeridiane, e infine 
posa le sue stanche membra sullo 
sgabello di un bar, vicino al vassoio 
con le ultime brioche. 

E’ adesso che le cose diventano inte¬ 
ressanti. Non essendo i suoi sensi del 
tutto intorpiditi (ed essendo lo stoma¬ 


co occupato con qualcosa), Marshal 
riesce a notare un tipo in un angolo, 
lontano dai computer, che tiene in 
mano un Watchman Sony, uno di quei 
piccoli VCR da 8 mm. 

La curiosità ha ucciso molti giornalisti, 
ma non c'è modo che il nostro uomo 
desista dall'idea di osservarlo più da 
vicino, specialmente perché c'è qual¬ 
cosa di interessante nello sfarfallio di 
quello schermo LCD. Le presentazio¬ 
ni sono accompagnate da uno sguar¬ 


do che rimane fisso sullo schermo. 

Il risultato è che lan Andrew, presiden¬ 
te della Incentive Software, comincia 
a raccontare molte cose su quello che 
stanno vedendo. 

Si tratta di Realtà Virtuale (l'avevo 
detto che eravamo arrivati al punto). 
Il team di progettisti di lan, è il respon¬ 
sabile della creazione del Castle 
Master, l’adventure in grafica solida 3- 
D che viene commercializzato con il 
nome di Domark in Gran Bretagna e 
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nel resto d'Europa. Castle Master è 
stato creato con un sistema grafico 
tridimensionale chiamato The 3-D 
Construction Kit, che ora viene ven¬ 
duto con questo nome. 

Il Kit impressiona favorevolmente, 
sebbene non sia ancora nulla rispetto 
a ciò che lan sta vedendo su quel 
Watchman. Ma prima il Kit... 

"Il sistema è stato progettato sulla 
base del Freescape 2 di nostra pro¬ 
prietà e permette la creazione e la 
costruzione di una realtà virtuale" af¬ 
ferma lan. 

"E' il primo prodotto che consenta di 
creare, progettare e pianificare un 
ambiente reale e poi di camminare in 
quell’ambiente e interagire con esso 
come se si fosse veramente al suo 
interno". 

"Usare il Kit è come costruire con dei 
blocchi, sebbene esista un'interfaccia 
grafica che rende le cose molto più 
semplici. Fate un muro, lo deformate, 
vi stringete ed entrate nel mondo che 
avete costruito: animate gli oggetti e li 
fate muovere entro di esso", 
lan sottolinea come le diverse "primi¬ 
tive" (sagome) consentano di creare 
edifici, strade, sotterranei, persino 
veicoli ordinari come le automobili o 
astratti come le sfere volanti. 

E' presente anche una libreria di effetti 
sonori pronta per l'uso. Il programma 
realizza grafica solida tridimensionale 
con rotazioni e movimenti molto rapi¬ 
di, sia con macchine a 8 che a 16 bit. 


Conoscendo il pubblico, è stato ag¬ 
giunto un gioco arcade/adventure 
scritto con il Kit. 

Non solo dimostra gli effetti e le ani¬ 
mazioni che possono essere realizza¬ 
te, ma risulta anche divertente. 

Ora, Marshal è disposto ad ammette¬ 
re che tutto ciò appare molto bello, 
dopo tutto Castle Master fa un certo 
effetto, ma la Realtà Virtuale implica 
anche l'impostazione di parametri che 
operino indipendentemente dall'os¬ 
servatore, o Dio, se lo si preferisce. 
Cose come la gravità, o ciò che acca¬ 
de quando una nuvola copre il sole, le 
persone e così via. Tutti aspetti che 
non possono essere modellati in 
maniera adeguata su sistemi a 8 bit 
come il Commodore 64 o anche da 16 
bit come Amiga. 

Questo tipo di cose richiede una gran¬ 
de potenza e sistemi evoluti. 

Ma torniamo a ciò che aveva attratto 
Marshal al principio. 

A un primo sguardo poteva sembrare 
The 3D Construction Kit, ci sono delle 
somiglianze, ma c'erano anche degli 
aspetti che indicavano che si trattava 
di una faccenda del tutto diversa. 

Ora non fatevi confondere dal fatto 
che lan si travesta: ciò che stava 
guardando era Supercase Virtual 
Realities, sotto gli auspici della Di- 
mension International (si tratta ancora 
di lan e del suo team). Questo sistema 
è stato progettato per essere attivato 
secondo le necessità dell’utente; 


questo può essere un individuo, un'a¬ 
zienda, o qualsiasi altro soggetto. 

Ciò che l'utente ottiene è una Realtà 
Virtuale personalizzata, un sistema 
completo, comprendente tutto il soft¬ 
ware e l’hardware necessario, assie¬ 
me ad una implementazione a tre 
dimensioni dell'ambiente richiesto, 
sia che già esista o meno. 

L'utente può poi muoversi al suo inter¬ 
no, interagire con questo mondo vir¬ 
tuale e vedere le cose come se si 
trovasse realmente in esso, aiutato in 
questo da un dispositivo di controllo a 
sei direzioni. Il tutto con un'accuratez¬ 
za estrema e in tempo reale. 

Mentre osserva questo mondo artifi¬ 
ciale (dall'interno di una vistosa auto 
sportiva rossa, ovviamente), lan mi 
confida alcune delle condizioni che 
l'hanno reso possibile. 

"Il tipo di potenza grafica necessaria 
alla Realtà Virtuale non esisteva 10 
anni fa" mi dice, "almeno non per 
coloro che non avevano accesso ad 
un super-computer, di quelli gelosa¬ 
mente conservati dal governo. Un 
sistema personalizzato fondato su un 
PC IBM 486 è ora in grado di eseguire 
i milioni di calcoli necessari, quando 
sia accompagnato dal nostro softwa¬ 
re e da una scheda grafica di alta 
qualità". 

Risoluzione dell'ambiente? Sorride: 
"Immagina la grandezza della Gran 
Bretagna con l’accuratezza di un mil¬ 
limetro. Si possono collegare allo 
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stesso ambiente fino a 8 terminali e 
ciascun operatore può avere un con¬ 
trollo indipendente degli oggetti sele¬ 
zionati e/o dei punti di vista", 
lan sottolinea che molte delle caratte¬ 
ristiche devono essere viste per poter 
essere apprezzate. 

"Cose come il movimento di più ogget¬ 
ti sotto il diretto controllo dell’utente, o 
mediante modelli predeterminati, o 
mediante controllo intelligente. 

Ci sono opzioni per punti di vista 
multipli, sia statici che in movimento e 
con la possibilità di associarli a oggetti 
in movimento, zoom e blocco del 
punto di vista". 

L'elenco continua con animazioni 
umani e animali, velocità lineari e 
angolari, specifiche di trasparenza, 
scelta della gravità e dell'attrito, 
lan prosegue: "Si tenga presente che 
tutto ciò è completamente interattivo, 
ci si può muovere a piacimento, aprire 
o chiudere porte, accendere le luci, 
entrare in veicoli e palazzi. Il che signi¬ 
fica che è possibile guidare un’auto, 
che si può camminare, correre o vola¬ 
re cambiando il punto di vista come 
meglio si preferisce". 

Ferma il registratore e si sposta, con 
l’avvolgimento veloce, in un’altra se¬ 
zione. 

Questa visualizza un certo numero di 
figure umane che corrono, muoven¬ 
dosi attraverso un paesaggio costitui¬ 
to da un mosaico colorato casualmen¬ 
te, quasi come se una trapunta gigan¬ 


te fosse stata buttata sulla Terra. 

I corridori sono bellissimi, con movi¬ 
menti naturali dalle articolazioni ed 
espansione del torace durante il 
movimento. 

Ci si è sforzati di dare il senso della 
realtà mediante i dettagli più infimi, sia 
che si tratti di uomini che di oggetti. 
Naturalmente, è possibile fare cose 
impossibili nel mondo cosiddetto 
"reale", come alterare il proprio punto 
di vista. 

In questo caso non ci spostiamo da un 
corridore all'altro. 

Ma potremmo anche prendere un’au¬ 
to e osservarla avvicinarsi a un edifi¬ 
cio particolare, poi spostarci al suo 
interno e osservare l'auto dall'ester¬ 
no, attraverso la finestra che le sta di 
fronte. 

Girarci per trovarci in un ufficio, la cui 
stanza ha il solito numero di sedie 
standard e di tediose scrivanie, con 
qualche pianta e un quadro sul muro 
antistante (un particolare notevole: lo 
schermo del PC sulla scrivania si illu¬ 
mina quando viene acceso). 


lan fa avanzare ancora il nastro fino 
ad un punto dove, per divertimento, 
l'utente ha azzerato la gravità. Ooops, 
tutto comincia a fluttuare, anche gli 
edifici. 

Gli usi per la Realtà Virtuale abbonda¬ 
no: basta dare sfogo alla fantasia 
Provate a pensare a un museo interat¬ 
tivo, che mostri oggetti, scene, struttu¬ 
re e costruzioni altrimenti impraticabili 
o impossibili da rappresentare. 
Oppure, come familiarizzarsi meglio 
con una regione o un continente lonta¬ 
no, mesi o anni prima di recarvisi? 

O, ancora, al lavoro su una piattafor¬ 
ma spaziale. 

O camminare entro l'ala che deve 
essere ancora terminata della vostra 
nuova casa e vedere come interagi¬ 
sce con il resto dell'ambiente. I piani¬ 
ficatori urbanistici esulterebbero se 
avessero a disposizione un tale stru¬ 
mento per verificare i cicli vitali delle 
aree metropolitane. 

Per non dimenticare gli uomini della 
pubblicità e delle pubbliche relazioni, 
che scherzerebbero per giorni pen¬ 
sando al potenziale di vendita. Ma 
persino l’high-tech giapponese ha 
bisogno di batterie nuove e pertanto lo 
schermo si oscura. Come pure la 
capacità di Marshal di ritrovare la stra¬ 
da attraverso il labirinto di suite per 
tornare al CES. 

Prodotti: 

Incentive Software 
Domark Ltd. 

3D Construction Kit 

Dimension International 
Zephyr One, Calleva Park 
Aldermaston 

Berkshire, England RG7 4QW 


Biografia dell'autore: 

Morsili M. Rosenthal è uno scrittore e un fotograto-giornalista, 
residente a New York, il cui lavoro lo porta in tutto il mondo. Non 
ha ancora completamente realizzato il suo sogno, quello di 
diventare anche rock star. 
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Nasce il nuovo SC Super Club 64 dedicato a tutti gli appassionati utilizzatori di questo piccolo Grande computer. Tutti 
possono partecipare attivamente con contributi editoriali e software. L'adesione al Club dà diritto a ricevere: 

• Tessera d'iscrizione 

• 6 numeri della rivista con dischetto da 51/4 "SC Super Club 64" 

• La possibilità di usufruire delle numerose offerte di programmi, software, manuali ecc. che nel corso dell'anno verranno 
di volta in volta proposte 


COME ENTRARE A MR PARTE DI QUESTO (LUB? 


E' semplice, basta compilare e spedire in busta chiusa questo tagliando a: 


SC Super Club 64 

DTP Studio 
via Matteotti, 14 
28043 Bellinzago Novarese 
(Novara) 


Affrettatevi! 

Il primo numero, 
già in preparazione, 
vi sarà inviato dal 
1 ° febbraio 1992 


I---1 

Cognome 

Nome_ 

| * _ - _ 

I C.A.P._Città_ 

| Provincia_Tel._/_ 

□ Si, desidero entrare a far parte del nuovo SC Super Club 64 alle condizio¬ 
ni previste. Allo scopo, invio L. 35.000 con la seguente modalità di pagamento: 

□ Tramite assegno bancario allegato 

□ Tramite vaglia postale di cui allego fotocopia della ricevuta 
L'iscrizione è valida per 6 numeri della rivista SC Super Club 64 

I_ 
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ONLY ON DISK 


CHRIS 



L'obiettivo di questo game arcade 
per due giocatori è molto 
semplice: trovare il nemico e 
annientarlo. I due player sono 
posizionati in un labirinto 
disseminato di proiettili, missili, 
pistole e teletrasportatori. 

Da sottolineare l'eccellente 
tecnica utilizzata dal 
programmatore per effettaure la 
scissione delle schermate. 

I labirinti che dovrete affrontare e 
superare vi impegnaranno per 
molto tempo ma, se siete dotati, 
grazie ad un editor, potrete 
creare dei nuovi labirinti una volta 
terminati quelli già presenti 
nel programma . 



■ •"•IV" 


H 


ULMER 


BX BASIC 

BX BASIC fornisce funzioni 
grafiche nel modo a 80 colonne 
del tipo VIC. Questa espansione 
del BASC CI28 interesserà sia i 
neofiti che i programmatori più 
esperti rendendo in pochi minuti 
un'eccellente grafica in piena 
risoluzione 640x200. 
Questo programma è fornito 
anche di caratteristiche extra 
che abilitano tecniche di 
programmazione strutturate, 
aiuti e comandi "blitter object 1 '. 
Una delle principali opzioni di 
questo soft è un comando che 
permette di usare sprite virtuali 
su una schermata a 80 colonne. 

Un semplice comando 
dà la possibilità di creare poligoni 
in tre dimensioni. 
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PROGRAMMI 


_ 

Q ual'è la vera natura dell'uni¬ 
verso? Tutti vi sarete chie¬ 
sti perché siamo qui e quali 
sono i nostri compiti. Re¬ 
gna il caos o esiste un certo 
ordine nell'universo? Le risposte ci 
vengono suggerite sia dalla scienza 
che dalla religione e quindi non aspet¬ 
tatevi che lo faccia per voi il vostro C64 
o 128. Rimane comunque il fatto che 
quali che siano le vostre idee al propo¬ 
sito, le recenti teorie riguardanti il caos 
suggeriscono alcune interessanti 
possibilità. 

I critici della televisione pubblica ac¬ 
clamano serial TV come "NOVA" e 
hanno recentemente concepito un 
programma che prende in considera¬ 
zione questa teoria e come questa 
agisca sulla mentalità moderna. Una 
delle idee più intriganti presentata nel 
programma è l’ordine e l'organizza¬ 
zione che può produrre il caos tramite 
la ripetizione di un semplice ma co¬ 
stante ruolo. La base di tutto consiste 
nella supposizione che il nostro unive¬ 
ro potrebbe provenire dal nulla grazie 
al lavoro di pochi e semplici ruoli. Le 
nostre migliori informazioni scientifi¬ 
che indicano che l'universo è compo¬ 
sto da elementi chimici ognuno dei 
quali possiede determinate proprietà. 
Il ferro, per esempio, ha una certa 
affinità con l'ossigeno. Altri elementi 
hanno caratteristiche simili. Nel 
momento della nascita dell'universo 
alcuni ruoli prevalevano su altri produ¬ 
cendo quanto conosciamo del mondo 
attorno a noi. 

Il programma 

Per illustrare questa teoria si potrebbe 
prendere un pezzo di carta e posizio¬ 
narci sopra sei paletti dove desidera¬ 
te. Per avere un risultato migliore bi¬ 
sogna piazzarli in prossimità dei quat- 


ROBERT C. TRAIN 



L'ordine scaturisce 
dal caos in questo 
divertente program¬ 
ma per 128/64. 


tro angoli del foglio. Quindi lanciate un 
dado due volte per selezionare due 
dei punti. Posizionate tra questi una 
riga e a metà strada tra uno e l'altro 
fate un punto. Da questo punto lancia¬ 
te un dado per selezionare un altro 
punto e ripetete il procedimento. 
Continuate per circa 24 ore. Quello 
che ne trarrete è un fenomeno visivo. 
Se non volete sprecare tutto questo 
tempo a disegnare linee per illustrare 
questa teoria, esiste un altro metodo. 
Lasciate che il vostro computer lo 
faccia per voi. 


Come iniziare 

Chaos 128 è scritto in BASIC. Inserite 
il listing usando The Automatic Proo- 
freader. Una volta terminato ricorda¬ 
tevi di salvarne una copia su disco. 
Nel programma da me scritto ho atti¬ 
vato la schermata grafica sul 128 e 
quindi seguito la procedura spiegata 
prima ma usando solo tre paletti. Il 
loop (linee 100-270) identifica il punto 
finale di una linea, calcola metà della 
distanza e quindi disegna un puntino. 
Mentre il programma si ripete emer¬ 
geranno dei campioni da puntini posi¬ 
zionati casualmente. 

Sentitevi però liberi di fare ulteriori 
esperimenti variando il numero di 
punti o la posizione di questi sulla 
linea. Questo semplice programma 
dimostra che l'ordine può apparire 
anche da una frequenza caotica. Ora 
non mi resta che trovare un modo per 
scoprire quali saranno i sei numeri 
vincenti della lotteria... 


© Computc Publicatums. Tutti i diritti sono riservati. 
Articolo tradotto dai numero di aprile di Compute 
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PROGRAMMI 


N egli ultimi anni, la parola 
"frattale" è diventata molto 
familiare nel mondo del per¬ 
sonal computer. Un frattale 
è una curva o una superfice 
che abbia dimensioni frazionarie. 
Mentre i frattali sono molto importanti 
per gli studi matematici, la maggior 
parte della gente comune li apprezza 
unicamente per il fatto che creano 
effetti grafici spettacolari. Per farvi un 
esempio, Star Trek II "Genesis" pre¬ 
senta una frequenza che li impiega in 
modo eccellente. Eight Thousand 
Dragons vi permette di vedere dei frat¬ 
tali sotto forma di drago che appari¬ 
ranno uno alla volta sullo schermo hi- 
res del 64. E' possibile creare più di ot¬ 
tocento draghi. 

Come iniziare 

Eight Thousand Dragons è un pro¬ 
gramma molto corto e occupa infatti 
circa 400 byte di memoria. Poiché è 
scritto in linguaggio macchina dovrete 
inserirlo usando MLX per evitare erro¬ 
ri di digitazione e rispondere alle sue 
domande digitando i seguenti valori: 

INDIRIZZO INIZIALE: 0801 
INDIRIZZO FINALE: 0998 


Inserite i dati di Eight Thousand Dra¬ 
gons e quando avete terminato ricor¬ 
date di salvarne una copia su cassetta 



PAUL CARLSON 


EIGHT 

Thousand 


IMI» 


Immagini frattali in¬ 
vaderanno la vostra 
casa con questo 
corto ma stupefa¬ 
cente programma 
grafico. Eight Thou¬ 
sand Dragons è il 
più veloce program¬ 
ma del genere che 
potete trovare per il 
vostro C64. 


o dischetto. Anche se scritto in lin¬ 
guaggio macchina, Eight Thousand 
Dragons si carica e gira come qualsia¬ 
si programma in BASIC. Per iniziare 
digitate LOAD"DRAGONS",8 (se su 
disco) oppure LOAD"DRAGONS",1 
(se su cassetta). Usate il nome del file 
specificato quando avete salvato il 
programma. Una volta che l'avrete ca¬ 
ricato digitate RUN. Il primo disegno 
che vedrete è il classico drago. Pre¬ 
mete un tasto qualsiasi per vedere 
quello seguente. Dopo il primo, i pa¬ 
rametri per i draghi vengono generati 
casualmente ed è possibile ammirare 
più di ottocento schermate. Per uscire 


dal programma non dovrete far altro 
che premere la lettera Q. 

Velocità mozzafiato 

per Eight Thousand Dragon 

Per raggiungere la velocità di Eight 
Thousand Dragons ho usato una tec¬ 
nica che ho chiamato "incremento 
degli indirizzi bitmap". Il calcolo com¬ 
pleto per gli indirizzi bitmap è stato 
fatto solo per il primo punto tracciato. 
Per quelli successivi ho compiuto solo 
delle variazioni agli indirizzi bitmap. Il 
calcolo è così facile e veloce per le 
curve dei draghi, perché ogni punto è 
immediatamente adiacente a quello 
precedente. Il programma si modifica 
da solo il che significa che varia se 
stesso mentre gira. Il programma trac¬ 
cia draghi arancioni su sfondo bianco. 
Se volete cambiare i colori digitate le 
seguenti linee: 

POKE2442,numero del colore 
di sfondo 

POKE2443,numero del colore 

in primo piano 

RUN 

Il numero del colore corrisponde a 
quelli elencati nella guida per l'utente 
che troverete nella confezione del 
vostro C64. 

© Compute Publications. Tutti i diritti sono riservati . 
Articolo tradotto dal numero di niugno di Compute 
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PROGRAMMI 


DAVID WILLIAMS 


Q uesto popolare gioco che di 
solito si gioca con un pezzo 
di carta e una matita è già 
stato adattato su altri home, 
ma Hangman 128 presenta 
un paio di caratteristiche nuove. Tiene 
automaticamente conto di quante 
partite avete vinto e di quante ne ha 
vinte il computer. Potete aggiornare e 
incrementare il suo vocabolario e in¬ 
corporare una vasta varietà di disegni 
di sottofondo che variano durante 
ogni partita che giocate. 

Come iniziare 

Hangman 128 è scritto interamente in 
BASIC 7. Per evitare errori di digita¬ 
zione inserite il listato usando The 
Automatic Proofreader, il programma 
di inserimento che vi abbiamo presen¬ 
tato in uno dei numeri scorsi di Super- 
Commodore. Una volta che avrete 
terminato di digitare il listing del gioco 
ricordatevi di salvarne una copia. 

Indovinate la parola 

Una volta lanciato il programma verrà 
estratta una parola a caso dal suo 
vocabolario. Al posto di ogni lettera 
che la compone apparirà un asterisco. 
Quando indovinate una lettera questa 
apparirà al posto dell'asterisco che la 
rappresenta. Una volta composta tut¬ 
ta la parola la vedrete apparire com¬ 
pleta sullo schermo assieme ad un 
messaggio del computer che vi chie¬ 
derà se volete giocare di nuovo. 

Se non riuscite a indovinare la parola 
apparirà il patibolo. Più lettere sba¬ 
gliate e minori saranno le possibilità di 
evitare di finire impiccati. Dopo che 
avrete chiesto otto lettere sbagliate 
perderete. Quando ne avete basta il 
computer vi annuncia quante partite 
ha vinto lui e quante volte siete riusciti 
a far fuori il povero omino. Il program- 





Vi presentiamo una 
sofisticata versione 
del popolarissimo 
gioco deH'impiccato 
per il 128. 


ma è provvisto di più di 400 parole, 
posizionate in un array, che vengono 
selezionate casualmente per ogni 
partita. Il programma è stato concepi¬ 
to per tenere in memoria 500 parole e 
quindi, se lo desiderate potrete inse¬ 
rirne di nuove. Per farlo dovrete sem¬ 
plicemente incrementare a un 
numero più alto di quello attuale le 


parole nel vostro vocabolario. Conti¬ 
nuate ad aggiungerne sotto forma di 
statement DATA. Ricordate solo che 
l’ultimo numero di DATA inserito è 
999. Se invece non volete inserire al¬ 
tre parole potete anche non farlo, il 
programma funzionerà lo stesso. Se 
esaminate con attenzione il listato del 
programma vi accorgerete che è scrit¬ 
to in modo molto interessante. Per 
esempio appaiono molti comandi 
CHAR e CIRCLE che iniziano con una 
virgola. Sulla linea 70 vedrete CIR- 
CLE,58,158,11,9. Questa sintassi è 
esatta. Abbiamo lasciato invariato il 
primo parametro. Per lasciarlo al suo 
valore di default potete sia digitare il 
default che oltrepassarlo inserendo 
una virgola. Sulla linea 20 vedrete 
COLOR.,12. Vi chiederete sicura¬ 
mente perché ci trovate un punto. 
Perché non COLORO, 12? Il BASIC 
interpreta un punto come fosse uno 0 
ma un po’ più velocemente che se 
inseriste il numero. 


© Compule Puhlications. Tutti i diritti som) riservati. 
Articolo tradotto dal numero di aprile di Compute 
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Compro 


Vendo Scambio... 



Vendo C64, registratore, drive, 
stampante, due joystick, 300 
iochi, corso BASIC, due libri 
ackson e sedici disegni a L. 
720000. Urbanelli Gianluca via 
S. Polo Dei Cavalieri, 42 - 00159 
Roma. Tel. 06/4390379. 

Cerco giochi per C64 su disco. 
Gradirei ricevere listino con rela¬ 
tivi prezzi. Viola Antonino via Bo¬ 
logna, 27/2 - 92010 Montevago 
(AG). 

Vendo giochi su cassetta per 
C64: Line of Fire, Turtles, Barba- 
rian I, Ghosts'n'Goblins, sei gio¬ 
chi sport, Buggy Boy, Super Star 
Soccer, New Zealand Stoiy, Pa¬ 
per Boy, Icary Warriors, Target 
Renegade e altri 400 giochi a 
poco prezzo. 

Lo Piano Michele via Domenico 
Russo, 11 - Palermo. Tel. 
6684040. 

Cerco il gioco in cassetta per 
C64 di Mario Bros a un prezzo di 
non oltre L. 10000 non copiato. 
Soldani Renzo via S. Lorenzo, 
47 - 52025 Montevarchi (AR). 
Tel. 901048. 

Vendo tastiera C64, video, disk 
drive, 48 dischi, registratore con 
18 cassette e Mountain Bike con 
cambio shimano a L. 1000000. 
Manna Luca via Pergolesi, 12 - 
20139 Vimercate (MI). Tel. 02/ 
6085625. 

Vendo C64, registratore, casset¬ 
te e programmi didattici a L. 
300000. Possibilmente zona 
Pisa, Landi Riccardo via Repub¬ 
blica, 57 - 56030 Monte Calvoli 
(PI). Tel 0587/ 748378. 

Cerco programma valido dupli¬ 
catore da cassetta a disco; cam¬ 
bio programmi toto, enalotto, to¬ 
tip, lotto. Prazzoli Vincenzo P.le 
erosione, 10 - 27100 Pavia. Tel. 
0382/464897. 

Scambio/vendo (solo su disco), 
games, utility, programmi per to¬ 
tocalcio, eccetera , per C64. Mi¬ 
rabelli Eddy via Von Gloden, 30 - 


98039 Taormina (ME). Tel. 
0942/23292. 

Vendo computer Amstrad CPC 
464 completo di registratore, 
monitor, joystick e 102 giochi a L. 
320000 trattabili. Sorbello Fran¬ 
cesco via Della Chiusa, 32 - 
98039 Taormina (ME). Tel. 092/ 
21125. 

Scambio giochi per C64 su cas¬ 
setta. A mia disposizione ho 
Super Wonderboy, Turbo Out 
Run, Crack Down, Thunder Bia¬ 
de e Spy Hunter. In cambio vorrei 
ricevere Kick Off 1 -2, Last Ninia 
1, la cassetta che trasformi il C64 
in Spectrum 48K. Antonioli Simo- 
ne via Sumatra, 49/4 - 41030 
Albareto (Modena). Tel. 059/ 
318779. 

Vendo/scambio programmi e 
giochi su disco per C64. Invio 
lista gratis a tutti. Zullo Salvador 
Piazza M. Imbriani, 28 - 83016 
Roccabascerana (AV). Tel. 
0825/993027. 

Cerco disperatamente program¬ 
ma per C64 "nastro/disco". Mas¬ 
sima serietà. Manca Gabriele via 
Luigi Cadorna, 6 - 96100 Siracu¬ 
sa. 

Compro a prezzo ragionevole il 
gioco Pyjamarama per C64 su 
cassetta. Scrivere a Stocco Ste¬ 
fano via Monte Sabino, 1 scala 1/ 
5 - 20092 Cinisello Balsamo (MI). 

Vendo una cassetta con oltre 60 
giochi e programmi a L. 20000 
per C64 e modem a L. 90000 
trattabili. Scrivere o telefonare a 
Pezzolla Giovanni via Dante - 
8520 Montemilione (PZ). Tel. 
0972/99294. 

Vendo un Commodore CI 6 
completo di tastiera, registrato- 
re, joystick, cavi vari, manuali, 
programmi e giochi. Compro 
stampante VIC1525 per CBM 64 
possibilmente a colori. Esigo 
massima serietà. Mazzetti Anto¬ 
nello via S. Alberto, 129 - 40018 
S. Pietro in Casale (BO). Tel. 


051/810069. 

Vendo C64 new, stampante 
MPS 1230, drive OC-118 N, 
tape, 2 joystick, 100 giochi (ulti¬ 
me novità), programmi vari, 
manuali in italiano, portafloppy, 
penna ottica, monitor Philips, 
visiera, copri tastiera e riviste; 
tutto a L. 780000. Sorte Carmelo 
S.S. 114 Km 5,600 - 28128 Tre- 
mestieri (ME). Tel. 090/ 
2712142. 

Vendo giochi per C64 solo su di¬ 
sco. Richiedere lista a Leonzio 
Andrea via Chiari, 3 - 20155 Mi¬ 
lano. Tel. 02/39217573. 

Vendo C64, registratore, drive 
1541, alimentatore, stampante 
MPS 803, un joystick e tutti i vari 
cavi di connessione, inoltre quasi 
300 game su cassetta e utility 
varie su disco il tutto a L. 700000. 
Manca Gabriele via L. Cadorna, 
6-96100 Siracusa. 


Cerco REV 1750 per CI28 più 
modem 6499 e loro istruzioni, 
cambio con MPS803, trattore, 
final cartridge 3 e istruzioni. Pol- 
tronieri Luigi via Galliano, 1 - 
22075 Lurate Caccivio. Tel. 031/ 
492093. 

Cerco C64/user per istruzioni 
adattatore telefonico 6499 ed in¬ 
formazioni CPM che non funzio¬ 
na (disco danneggiato o altro?). 
Compro RAM 1700 max L. 
50000. Contatto C64/128 user 
per istruzioni ad. telefonico 6499 
ed impressioni GEOS 64/128. 
Mancuso Francesco via G. To- 
niolo, 56 - 92100 Agrigento. Ca¬ 
sella Postale Videotel Mail/Box 
360101336. 

Cedo per cambio sistemaVendo 

giochi e utility per C64 su casset¬ 
ta e disco. Invio elenco a richie¬ 
sta. Briganti Cosimo via per 
Uggiano, 186 - 74024 Manduria 
(TA). Tel. 099/8794090 


Il Gruppo Editoriale Jackson non si assume responsabilità in caso di 
reclami da parte degli inserzionisti e/o dei lettori. Nessuna responsabilità è 
altresì accettata per errori e/o omissioni di qualsiasi tipo. 

La redazione si riserva di selezionare gli annunci pervenuti eliminando 
quelli palesemente a scopo di lucro o riferiti a vendita di programmi copiati. 
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LEZIONE 6 


La tabella della 
verità 



Il linguaggio 


logiche è vero (quindi pari ad 1 ), se e 
solo se entrambe le espressioni sono 
vere (uguali ad 1)”. 

La variabile F, definita come 

LETF=(A> 1 )AND(B>2) 

risulterà pertanto pari ad 1 soltanto se 
entrambe le espressioni aH'interno delle 
parentesi risulteranno verificate, cioè se 
A sarà maggiore di 1 e B maggiore di 2. 
Come al solito il tuo computer assegne¬ 
rà alle espressioni verificate il valore di - 
1. Se invece anche una sola delle due 
parentesi conterrà un'espressione falsa, 
F assumerà valore 0. Ad esempio: 

LETI=(G=3.1 )AND(T=4.5) 

I assumerà valore -1 se G e T avranno 
valore rispettivamente uguale a 3.1 e 
4.5. In caso contrario il valore sarà 0. 


Questa volta l’unico modo per ottenere 
un risultato vero è che entrambe la 
espressioni risultino vere, cioè 1. In un 
certo senso si può quindi dire che il 
prodotto logico è l’operazione inversa 
alla somma logica (se provi a confronta¬ 
re le due tabelle AND OR, te ne rende¬ 
rai subito conto). 

Se OR e AND sono usati invece che per 
confronti, come operatori logici tra valori 
numerici, il risultato ottenuto è dato 
dall’operazione logica applicata ai 
singoli bit del corrispondente numero 
binario. Ad esempio: 127 OR 3 ti 
restituirà il valore 127, perché il corri¬ 
spondente binario del decimale 127 è 
01111111, quello di 3 è di 00000011 e 
la OR logica di ogni singolo bit ricavata 
dalla tabella della verità dà come 
risultato 01111111 che equivale al 
decimale 127. 4 AND 1 ti restituirà il 
valore di zero. 

Priorità degli 
operatori logici 

Anche gli operatori logici hanno una 
loro priorità, analogamente agli operato¬ 
ri matematici. L'ordine delle priorità 
nelle operazioni logiche è infatti, 


partendo dalla più bassa alla più alta, 
OR, AND, NOT. Tali precedenze 
possono naturalmente sempre essere 
alterate facendo uso delle parentesi: 
anzi, visto che l’occhio umano non è 
molto abituato a leggere espressioni 
come 

A=NOTC>A AND B OR D AND C 

sarà meglio, per evitare facili errori o 
confusioni, utilizzare sempre e comun¬ 
que le parentesi: 

A=(NOT(C>A)AND B)OR(D AND C) 

Nella parte della lezione dedicata alla 
programmazione troverai comunque 
alcuni esempi applicativi, che ti consen¬ 
tiranno di acquisire maggiore pratica e 
familiarità sull'uso degli operatori logici. 

STOP 

Immagina di essere in una sala di regia 
seduto davanti alla moviola: stai verifi¬ 
cando la sequenza delle immagini di un 
film. All’improvviso ti accorgi che manca 
la sequenza centrale (quella che spiega 
“i risvolti psicologici" del protagonista). 
Interrompi allora la proiezione, cerchi e 
(per fortuna) trovi il pezzo mancante, 
senza il quale il film sarebbe risultato un 
“polpettone”, e lo incolli nel punto esatto 
in cui era previsto. Ora tutto è a posto e 
la proiezione può proseguire. Trasferisci 
adesso tutto il discorso su un altro 
piano: il film è un programma e tu, da 
operatore, diventi un programmatore. Il 
programma non funziona nel migliore 
dei modi: per quanto esso sembri non 
evidenziare alcun errore lampante e 
palese, ad un certo punto si blocca con 
un messaggio di errore. Ti farebbe 
proprio comodo un'istruzione che 
potesse arrestare momentaneamente 
l’esecuzione consentendoti di controlla¬ 
re alcuni risultati intermedi e di riprende¬ 
re come se niente fosse accaduto... 

Che fare? Il BASIC, per i casi come 
questo, ti mette a disposizione l'istruzio¬ 
ne STOP. Infatti STOP, ferma l'esecuzio¬ 
ne di un programma e provoca la 
visualizzazione di un messaggio 
indicante la linea di programma nella 
quale l’interruzione è avvenuta, proprio 
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CONTINUE 


NEW 


come se si fosse verificato un errore. Il 
grosso vantaggio è che dopo una STOP 
il calcolatore si pone nel modo "editor": 
puoi cioè inserire nuove linee, apportare 
correzioni, esaminare o modificare il 
valore delle variabili. Naturalmente, una 
volta risolti tutti i problemi è bene che gli 
STOP siano eliminati. A nessuno, fa 
piacere vedere un programma arrestar¬ 
si nel bel mezzo dell'esecuzione! Cosi, 
per esempio, la linea 

150 STOP 

visualizzerà, quando eseguita 

BREAK IN 150 

avvertendoti che l’interruzione del 
programma si è verificata alla linea 150, 
in seguito ad un'istruzione STOP. 

Sintassi dell’istruzione 

STOP 


Come alla moviola è possibile riprende¬ 
re la proiezione dal punto esatto di 
interruzione, anche in un programma 
che è stato bloccato in seguito ad una 
STOP è possibile riprendere l’esecuzio¬ 
ne, grazie al comando CONTINUE (che 
ovviamente va impartito in modo 
immediato). STOP e CONTINUE 
costituiscono pertanto un utilissimo 
strumento per il debugging, cioè per la 
correzione e messa a punto dei pro¬ 
grammi. Con esso puoi infatti controllare 
i punti strategici di un programma, 
eventualmente modificando e miglioran¬ 
do quelle istruzioni che in un primo 
tempo ti sembravano perfettamente 
corrette, senza però per questo inter¬ 
rompere in modo definitivo l’elaborazio¬ 
ne in corso fino a quel momento. 

Sintassi del comando 

CONTINUE 


Talvolta, hai la necessità di cancellare 
un programma dalla memoria del 
computer. In questo caso due sono le 
possibili alternative: togliere semplice- 
mente l'alimentazione al computer, per 
poi riaccenderlo, oppure (con molta più 
eleganza) impartire il comando NEW. 
NEW serve infatti per cancellare il 


O 

CORSO DI BASIC PER C64 


programma BASIC presente in memoria 
insieme a tutte le variabili. Normalmente 
lo si usa quando si inizia a scrivere un 
nuovo programma e si vuole essere 
sicuri che non vi sia alcuna istruzione, o 
parte di programma, già presente in 
memoria. E’ naturalmente un comando 
da utilizzare con molta attenzione: un 
NEW impartito senza troppa cura può 
infatti provocare in un attimo la scom¬ 
parsa di ore ed ore di lavoro alla 
tastiera. NEW viene solitamente adope¬ 
rato in esecuzione immediata; tuttavia lo 
puoi inserire in un programma: 


190 REM ATTENZIONE: RISPONDEN¬ 
DO CON NO PERDI IL PROGRAMMA 
200 IFA$=''NO"THENNEW 


O 


In questo caso, però, devi tener ben 
presente che, al momento dell'esecu¬ 
zione della linea 200, l’intero program¬ 
ma verrà cancellato, provocando come 
conseguenza l'istantaneo arresto di 
qualsiasi attività del calcolatore. Sarà 
comunque buona cosa che prima di 
inserire questo comando in un program¬ 
ma tu impari a utilizzarlo ed a capirne 
l'esatto funzionamento nel più classico 
(e sicuro) utilizzo immediato. 


Sintassi del comando 

NEW 


0N...G0T0 


Abbiamo visto nelle scorse lezioni come 
l'istruzione IF ti permetta di prendere 
una decisione tra due possibili alternati¬ 
ve. L’istruzione ON<espressione> 

GOTO consente invece di passare il 
controllo dell'esecuzione ad una qua¬ 
lsiasi linea di programma, in funzione 
del valore assunto dall’espressione 
numerica compresa tra le parole ON e 
GOTO. ON GOTO consente, pertanto, 
la realizzazione di una struttura alternati¬ 
va multipla; vediamo il programmino 
nella pagine successiva. 

Il programma inizia richiedendo in 
ingresso un valore numerico. Valuta 
quindi l'espressione compresa tra ON e 
GOTO (nel nostro caso semplicemente 
costituita da A) e, a seconda che la 
parte intera di A abbia valore 1, 2, 3, 4, 
esegue un salto al primo, al secondo, al 


O 
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LEZIONE 6 


IO INPUTA 

ONAGOT040,50,60,70 
GOT010 

PRINT'HAI PREMUTO 1*:END 
PRINT'HAI PREMUTO 2 - :END 
PRINT’HAI PREMUTO 3‘ END 
70 PRINT-HAI PREMUTO 4‘:END 


TI 


II linguaggio 


terzo o al quarto numero di linea 
presente dopo la parola GOTO. 

Se il valore di A è invece zero, oppure 
supera la quantità di numeri di linea 
presenti nell'istruzione, il programma 
prosegue con la linea di programma 
immediatamente seguente. Proprio 
questa è la ragione per cui è stata 
inserita la riga 30: essa provocherà 
infatti la riesecuzione del programma 
fintanto che dalla tastiera sarà stato 
battuto un valore compreso tra 1 e 4. 

Un valore negativo dell'espressione 
provocherà invece il messaggio: 

7ILLEGAL QUANTITY 

L’istruzione ON...GOTO può essere utile 
solo quando le differenti possibilità alle 
quali sei interessato hanno valori 
consecutivi, per di più iniziami con il 
valore uno, oppure siano riducibili a tale 
situazione. E' un comando potente che 
richiede però una certa pratica di 
programmazione. Pensa, infatti, a 
quanta efficienza ed eleganze e 
leggibilità ha questa istruzione: 

100 ONFLAG 

GOTOI 000,2000,3000,4000,5000 
al posto di 

100 IFFLAG=1THENGOT01000 
200 IFFLAG=2THENGOT02000 
300 IFFLAG=3THENGOT03000 
400 IFFLAG=4THENGOT04000 
500 IFFLAG=5THENGOT05000 

Senza pensare poi alla maggiore 
velocità di esecuzione!! 

Sintassi dell’istruzione 

ON espressione GOTO linea 
1 [,linea2] [,...] 


Il tuo C64 ha uno specile orologio che 
parte al momento dell'accensione e 
misura in sessantesimi di secondo il 
tempo trascorso da quell'istante. Se 
desideri dunque sapere da quanto 
tempo stai operando al computer, non 
devi far altro che introdurre: 

PRINTTI 

Dividi il numero ottenuto per 60 ed 


otterrai il tempo in secondi o per 3600 
per averlo in minuti e cosi via. 

Questa funzione può essere molto utile 
quando ti occorre una misura del tempo 
molto precisa. 

Tl$ 

Con la funzione Tl$ puoi invece visualiz¬ 
zare un vero e proprio orologio rappre¬ 
sentato da una stringa di 6 caratteri 
nella forma "OOMMSS". Ad esempio, un 
valore di Tl$ pari a 103245 significa ore 
10:32 minuti:45 secondi, mentre 170000 
sta per le 5 pomeridiane. Per introdurre 
l’ora esatta, è sufficiente assegnare a 
Tl$ la stringa che ne rappresenta il 
valore; se adesso fossero le 21:15:00, 
dovresti digitare: 

LETTI$=‘211500* 

e battere RETURN. L'ora esatta ti verrà 
data ogni volta che lo richiederai con: 

PRINTTI$ 

Attenzione però, perché le operazioni di 
caricamento e salvataggio da cassetta 
interferiscono col funzionamento 
dell’orologio del tuo C64 sospendendo¬ 
ne quasi il funzionamento. 

CLR 

Il comando CLR può essere utilizzato 
sia in modo immediato che come 
istruzione in un programma. Ha il 
compito di cancellare il valore di tutte le 
variabili, di qualunque tipo esse siano. 
Dopo un CLR, tutte le variabili numeri¬ 
che avranno valore 0 e quelle stringa 
valore nullo. Lascia intatto, però, il 
programma in memoria ed in questo si 
differenzia dal più drastico NEW. Ecco 
un esempio per testare l'effetto di CLR. 

10 LETA=RND(0) 

20 LETB$=’ PROVA CLR” 

30 PRIMA, B$ 

40 CLR 
50 PRIMA,B$ 

60 LIST 




K s 

Come Programmare 


Applicazione 
degli operatori 
logici 


Ci proponiamo di risolvere il seguente 
problema: dati in ingresso tre numeri 
qualsiasi, trovarne il maggiore ed il 
minore. Supponendo di chiamare A, B, 
C le variabili adibite aH’inserimento nel 
calcolatore dei tre valori numerici, un 
possibile schema a blocchi potrebbe 
essere: L'estrema semplicità del 
problema non richiede di certo alcuna 
spiegazione sul flowchart. Qualche 
parola è invece necessario spenderla 
sulla conversione del diagramma nel 
corrispondente programma BASIC di 
cui troverai più avanti due distinte 
versioni. Il tuo computer le gradirà 
entrambe: dal suo punto di vista, infatti, 
una volta che la sintassi risulta corretta 
non esiste alcuna differenza tra l’una o 
l'altra. Noi invece, ci accorgiamo imme¬ 
diatamente della differente impostazio¬ 
ne, struttura e leggibilità intercorrente 
tra i due listati. Grazie all’uso intensivo 
degli operatori logici, seguire, compren¬ 
dere e, soprattutto, controllare la 
funzione, l’esecuzione e lo svolgimento 
di ogni singola istruzione della seconda 
versione dovrebbe risultare difatti molto 
più semplice e lineare di quanto non sia 
possibile fare con la prima. Ciò è 
dovuto in gran parte all'assenza di 
istruzioni GOTO, il cui difetto è spesso 
quello di interrompere la forma logica 
che si era seguita al momento della 
stesura dello schema a blocchi. Un 
consiglio quindi: impara da subito a 
programmare, cercando di seguire 



10 INPUTA.B.C 
20 IFA>=BANDA>=CANDB>= 
CTHENMA=A:MIN=C 
30 IFA>=BANDA>=CANDNOT(B> 
=C)THENMAX=A:MIN=B 
40 IFA>=BANDNOT(A>= 
C)THENMAX=C:MIN=B 
50 IFNOT(A>=B)ANDNOT(B>= 
C)THENMAX=C:MIN=A 
60 IFNOT(A>=B)ANDB>=CANDA> 
=CTHENMAX=B:MIN=C 
70 IFNOT(A>=B)ANDB>=CAND 
NOT(A>=C)THENMAX=B:MIN=A 
80 IFMAX=MINTHENPRINT”VALORI 
UGUALI":END 

90 PRINriL VALORE MASSIMO 
E’";MAX 

100 PRINT'IL VALORE MINIMO 
E”;MIN 
110 END 


O 
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10 INPUTA.B.C 
20 IFA>=BTHENGOTO40 
30 GOTO80 

40 IFA> =CTHENGOT060 
50 MAX=C:MIN=B:GOTO120 
60 IFB>=CTHENMIN=C: 

MAX=A:GOT 0120 
70 MIN=B:MAX=A:GOTO120 
80 IFB>=CTHENGOTO100 
90 MAX=C:MIN=A:GOTO120 
100 IFA>=CTHENMAX=B:MIN= 
C:GOTO120 
110 MAX=B:MIN=A 
120 IFMAX=MINTHENPRINT 
"VALORI UGUALI”:END 
130 PRINT’IL VALORE MASSIMO 
E”';MAX 

140 PRINT'IL VALORE MINIMO 
E’”;MIN 
150 END 


questa impostazione e diventerai un 
ottimo programmatore. 

A proposito: un'ultima osservazione, 
questa volta riguardo alla sintassi. 
Cosa succederebbe se per esempio 
alla riga 

30 IFA>=BANDA>=CANDNOT(B>= 
C)THENMAX=A:MIN=B 

non venissero messe le parentesi? 


30 IFA>=BANDA>=CANDNOTB>= 
CTHENMAX=A:MIN=B 


Prova a pensarci! 


O 


Applicazione 

deM’istruzione 

ON...GOTD 


Il problema che ci proponiamo di 
risolvere è il seguente: assegnata in 
ingresso una data nel formato GG, MM, 
AA (dove GG, MM e AA sono valori 
numerici, come per esempio 13, 03.85), 
desideriamo che in uscita la parte MM 
della data venga trasformata da numeri¬ 
ca in alfanumerica, sostituendo cioè il 
valore indicante il mese con il corrispon- 
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dente nome italiano del mese (nell'e¬ 
sempio dovremmo quindi ottenere 13 
marzo 85). 

Ciò viene fatto utilizzando proprio 
l'istruzione ON...GOTO: 

10 REM TRASFORMA IL MESE 
20 INPUT'GIORNO, MESE, 
ANNO”;G,M,A 

30 IFM< 10RM> 12THENPRINT 
"ERRORE NEL MESE":GOTO20 
40 IFG<10RG>31THENPRINT 
"ERRORE NEL GIORNO": 
GOTO20 

50 ONMGOT060,70,80,90,100, 
110,120,130,140,150, 

160,170 

60 MESE$="GENNAIO":GOTO180 
70 MESE$="FEBBRAIO": 

GOT0180 

80 MESE$="MARZO":GOT0180 
90 MESE$="APRILE":GOTO180 
100 MESE$='MAGGIO":GOT0180 
110 MESE$="GIUGNO":GOTO180 
120 MESE$=’LUGLIO":GOTO180 
130 M ESE$="AGOSTO" :GOT0180 
140 MESE$="SETTEMBRE": 

GOT0180 

150 MESE$=’OTTOBRE":GOTOl80 
160 MESE$="NOVEMBRE": 

GOTO180 

170 MESE$=’DICEMBRE" 

180 PRINT'LA DATA IMMESSA E':"; 

G;" ";MESE$;" ";A 
190 END 

Il programma comincia richiedendo in 
ingresso i 3 valori del giorno, del mese 
e dell'anno (riga 20). Le linee 30 e 40 
controllano quindi che la meso ed al 
giorno siano stati assegnati valori 
ammissibili. Nota come l'operatore 
logico OR abbia semplificato la stesura 
delle istruzioni condizionali; anziché 
dover scrivere: 

IFM<1THENPRINT”ERRORE 
NEL MESE":GOTO20 
IFM> 12THENPRINT”ERRORE 
NEL MESE'':GOTO20 
IFG<1THENPRINT"ERRORE 
NEL GIORNO”:GOTO20 
IFG>31THENPRINT’’ERRORE 
NEL GIORNO":GOTO20 

si è infatti potuto ricorrere a sole due 
righe, permettendo di conseguenza un 


risparmio di tempo e memoria del 
computer. Alla linea 50 appare final¬ 
mente la nostra amica ON...GOTO: a 
seconda del valore attribuito ad M, essa 
passerà quindi il controllo ad una delle 
istruzioni di assegnazione specificate 
dai numeri di linea successivi al 
ON. ..GOTO (abbiamo omesso dalla 
linea 60 alla 170 l'opzionale LET; 
comunque è come se ci fosse). La 
stampa della data nel formato richiesto 
(riga 180) concluderà quindi l'esecuzio¬ 
ne del programma. 


Quando, come nel programma 
seguente, si offre all'utente una 
scelta tra diverse possibilità, è bene 
ricorrere al menù, cioè ad una lista 
delle varie opzioni, opportunamente 
presentate. In questi casi torna 
particolarmente utile l’istruzione 
ON...GOTO poiché consente 
di limitare il numero delle IF di verifica 
della scelta effettuata. 

Ne guadagna la semplicità e la 
chiarezza del programma. 

10 PRINT" 0 00 1JSUP. 
LATERALE" 

20 PRINT"2]SUP.TOTALE” 

30 PRINT'3]VOLUME" 

40 PRINT" 0 PREMI 4 PER 
FINIRE" 

50 INPUrSCELTA";V 
60 IFV<1ORV>4THENGOTO50 
70 IFV=4THENEND 
80 INPUT” 0 (D SPIGOLO" 

;S 

90 ONVGOT0100,110,120 
100 LETR=S12:GOTO130 
110 LETR=6*S A 2:GOTO 
130 

120 LETR=S A 3:GOTO 
130 

130 PRINT" B| RISULTATO" 

;R 

140 PRINT" 0 0 PREMI UN 
TASTO" 

150 GETR$: IFR$=""THEN 150 
160 GOTOIO 


Programma 
a menu 


I 

































Come programmare 


CORSO DI BASIC PER C64 


Uso di vettori 
e matrici 




Il primo programma che oggi esamine¬ 
remo è un esempio introduttivo all'uso 
degli array. Adoperando i vettori è infatti 
indispensabile avere ben chiari nella 
mente i concetti di elemento, valore ed 
indice: questo programma dovrebbe 
perciò aiutarti a risolvere eventuali 
dubbi ed incertezze. 

Ciò che ci proponiamo di fare è molto 
semplice: definire un array di 7 elementi 
e memorizzare in ciascuno di essi un 
valore a caso (compreso tra 0 e 100) 
generato dalla funzione RND. 

10 DIMA(6) 

20 FORI=0TO6 
30 LETA(I)=INT(RND(0)*100) 

40 REM VISUALIZZA I VALORI 
ASSEGNATI 

50 FORJ=0TO6:IFA(J)<10 
THENPRINT" 

60 PRINTA(J);'-’; 

70 NEXTJ 
80 PRINT 
90 NEXTI 

L'esecuzione di questo programma è 
resa interessante dalla ripetuta stampa 
sullo schermo dei valori contenuti nel 
vettore. AH'interno del ciclo FOR princi¬ 
pale (quello, per intenderci, che inizia 
alla linea 20) è stato infatti inserito un 
secondo ciclo (linee 50-70) che visualiz¬ 
za sullo schermo i valori in quel momen¬ 
to presenti nell'array. Man mano che la 
variabile indice verrà incrementata 
vedrai come gli zeri (contenuti inizial¬ 
mente nel vettore in seguito alla DIM) 
saranno sostituiti dai numeri casuali. Sul 
tuo video avrai quindi una copia fedele 
di quanto sarà successo, durante il 
programma, all'interno della memoria 
del tuo computer. 

Come puoi notare, è perfettamente 
lecito utilizzare due indici differenti (nel 
nostro caso I e J) per riferirsi ad uno 
stesso elemento dell'array: l'importante 
è solo che rispettino i limiti di definizione 
del vettore. Come secondo esempio 
vediamo un programma che ricerca il 
massimo tra un certo gruppo di numeri 
(per esempio 100). 

Questi numeri devono venir memorizzati 
all'interno di un array; per nostra 
comodità automatizzeremo l'inserimento 
dei valori con un ciclo FOR e la funzione 
RND (sarabbe infatti troppo noioso e fru¬ 
strante essere costretti ogni volta a 


battere tutti i 100 numeri!). 

La ricerca del valore massimo procede¬ 
rà attraverso la scansione di ogni 
singolo elemento del vettore (assegnan¬ 
do alla variabile MAX il valore massimo 
incontrato sino a quel momento) fintanto 
che l'array non sarà stato ispezionato 
per intero. 

10 LETJ=99 
20 DIMC(J) 

30 REM CARICAMENTO 
DELL'ARRAY 
40 FORI=OTOJ 
50 LETC(I)=INT(RND(0)*100) 

60 NEXTI 

70 REM RICERCA DEL NUMERO 
MASSIMO 

80 LETMAX=C(0):REM PRIMO 
ELEMENTO=MAX 
90 FORI=ITOJ 

100 IFMAX<C(I)THENMAX=C(I) 

110 NEXTI 

120 PRINT" SI Q IL VALORE 
MASSIMO E'";MAX;’ Bl ‘ 

130 PRINT'ECCO I NUMERI 

CONTENUTI NELL'ARRAY g] 

140 FORI=0TOJ:IFC(l)<10 
THENPRINT" 

150 PRINTC(I);:NEXTI 
160 END 


Prova a modificare il programma, 
cercando di trovare, oltre al valore 
massimo, anche il valore minimo. Può 
anche essere interessante rilevare il 
drastico aumento del tempo di esecu¬ 
zione conseguente ad un incremento 
(per esempio da 100 a 500) della 
dimensione dell'array. Non hai che da 
sbizzarrirti! Il terzo ed ultimo esempio 
della nostra lezione è la soluzione del 
seguente problema: data una lista di 
numeri interi trovare quanti numeri essa 
contiene e determinare le posizioni 
occupate. Come prima, l'inserimento 
dei numeri è affidato a RND. Cerca nuo¬ 
vamente di apportare modifiche e 
miglioramenti; potresti per esempio 
calcolare la somma degli elementi nei 
due array, oppure cercare in quali 
posizioni si trovano numeri compresi in 
un certo intervallo, od ancora (anche se 
questo lo vedremo insieme in una delle 
prossime lezioni) ordinare in ordine 
crescente o decrescente i vari elementi, 
inizialmente disposti a caso. Qualsiasi 
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tentativo non potrà che incrementare la 
tua confidenza con gli array o vettori e 
le matrici. 


Il gioco della battaglia navale è talmente 
conosciuto da non aver bisogno di 
alcuna spiegazione. Interessante è 
invece istruire il computer a gestirlo: si 
tratta cioè di affidare al tuo C64 il 
compito di predisporre il campo di bat¬ 
taglia, il collocamento casuale delle 
navi, il controllo delle cannonate. DIM 
avrà la funzione di costruire la tabella 
delle caselle che costituiscono la zona 
di mare interessata al combattimento 
mentre RND provvederà a disporre le 
navi nemiche in posizioni sconosciute e 
imprevedibili. Provando a giocare ti 
renderai conto di quando la difficoltà 
dipenda dalla fortuna e dalle dimensioni 
della matrice. Prova a ridurla. Inventa 
anche un modo di farti dire dal compu¬ 
ter dove si trovano le navi che non riesci 
a colpire 

10 REM IL VETTORE A CONTIENE I 
NUMERI, P LE POSIZIONI DEI 
NUMERI DISPARI 
20 INPUT-QUANTI SONO I 
NUMERir;NUM:LETNUM= 

NUM-1 

30 DIMA(NUM),P(NUM) 

40 FORI=OTONUM 
50 LETA(I)=INT(RND(0)*1000) 
:PRINTI,A(I):REMI NUMERI 
SARANNO COMPRESI TRA 
0 E 999 
60 NEXTI 

70 REM INIZIALIZZA IL CONTATO 
RE DEI NUMERI DISPARI 
80 LETK=0 

90 REM CERCA I NUMERI DISPARI 
100 FORI =0TONUM 
110 REM DIVIDI PER 2 IL NUMERO 
E SE C'E' RESTO, VUOL DIRE 
CHE E' DISPARI 
120 LETB=A(l)/2 
130 REM PRENDE LA PARTE 
INTERA DELLA DIVISIONE 
140 LETC=INT(B) 

150 REM SE LA PARTE INTERA DEL 
RISULTATO DELLA DIVISIONE 
E' UGUALE AL RISULTATO 
STESSO, VUOL DIRE CHE NON 
ESISTE PARTE DECIMALE E 
QUINDI IL NUMERO E' PARI 


180 IFB=CTHENGOTO240 
190 REM IL NUMERO E' DISPARI, 
QUINDI METTI LA POSIZIONE 
DEL NUMERO NEL VETTORE 
POSIZIONI 
210 LETP(K)=1 
220 REM INCREMENTA IL 
CONTATORE DEI NUMERI 
DISPARI 
230 LETK=K+1 
240 NEXTI 

250 REM STAMPA LA QUANTITÀ' 

DEI NUMERI DISPARI E LE 
LORO POSIZIONI 
270 PRINT’I NUMERI DISPARI 
SONO';K 

280 PRINT’I NUMERI DISPARI 
OCCUPANO LE POSIZIONI:"; 

290 FORI=OTOK-1 
300 PRINTP(I);"-'; 

310 NEXTI 
320 END 

10 DIMA(5,5):LETT=0:LETB=0 
20 FORN=1T05 
30 LETC=INT(RND(1)*6) 

40 LETR=INT(RND(1)*6) 

50 IFA(C,R)=1:NEXT 
70 LETT=T+1:PRINT 
"CANNONATA*;T 
80 INPUT‘COORDINATE'';C,R 
90 IFA(C,R)=0THENPRINT 
"ACQUA": GOTO110 
100 PRINT'COLPITA':LETB=B+1: 

LETA(C.R)=0 
110 IFB<5THENGOTO70 
120 PRINT-CANNONATE-;T 
130 INPUT-RIPROVI‘;R$ 

140 IFR$="S"THENRUN 
150 END 

I programmi che seguono illustrano 
alcune possibili applicazioni sulle 
funzioni per il trattamento delle stringhe. 
Vediamo il primo esempio che si 
propone di stampare una stringa 
introdotta dalla tastiera, solo se il primo 
carattere è diverso da "A" o da “B\ 
Particolari difficoltà non ne esistono; 
l'unica cosa da notere è la riga 60: è 
infatti necessario controllare che il 
priimo carattere sia diverso da "A” o da 
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INIZIO 

I 

CHEA MATRICE - 



STAMPA 
N* TOT TIRI 



El* 


"B\ Nel secondo esempio si tratta di 
scrivere una parola come al solitop 
introdotta dalla tastiera, in senso 
inverso, cioè opposto al normale 
(partendo quindi da destra per andare 
verso sinistra). 

10 PRINT'd INSERISCI LA 
STRINGA'; 

20 INPUT N$ 

30 REM A$=DIVENTA LA PRIMA 
LETTERA DELLA STRINGA 

40 LETA$=LEFT$(N$,1) 

50 REM CONTROLLA SE INIZIA 
PER A O B 

60 IF (AS^'A-JOR^-B 1 ) THEN 
GOT0100 

70 REM LA STRINGA INIZIA CON 
UNA LETTERA DIVERSA 

80 PRINT’LA STRINGA E': -;N$ 

90 END 

100 PRINTLA STRINGA NON E' 
STAMPABILE PERCHE' 

INIZIA PER ”;A$ 


10 PRINTINSERISCI LA STRINGA’; 
20 INPUT A$ 

30 LETK=LEN(A$) 

40 FORI=KT01 STEP-1 
50 PRINT MID$(A$,I,1); 

60 NEXTI: PRINT 
70 INPUT-ANCORA-; R$ 

80 IFR$="S’THEN RUN 
90 END 


Anche in questo caso il procedimento è 
molto semplice: si preleva un carattere 
alla volta dalla parola (o dalla frase) da 
scrivere, partendo dalla destra e per 
tante volte quanti sono complessiva¬ 
mente i caratteri costituenti la parola 
stessa. Alla fine, sullo schermo si 
troverà visualizzata la stringa originaria 
scritta al rovescio. Se qualcosa non ti è 
chiaro, aggiungendo la riga 

35 FORJ=0TO500: NEXTJ 

introducendo cioè un ciclo di ritardo, 
avrai la possibilità di osservare molto 
più agevolmente la formazione, caratte¬ 
re dopo carattere, della parola comple¬ 
ta. Un'altra possibile soluzione al nostro 
problema, avrebbe potuto essere quella 
rappresentata nel breve programma 
che segue. 


10 PRINT'INSERISCI LA STRINGA”; 
20 INPUTAS 
30 LETB$=’ " 

40 LETK=LEN(A$) 

50 FORI=1TOK 
60 LETA$=LEFT$(A$,K-I+1) 

70 LETC$=RIGHT$(A$, 1 ) 

80 LETB$=B$+C$ 

90 NEXTI 
100 PRINTBS 
110 END 

In questo caso i vari caratteri, anziché 
essere direttamente inviati sullo scher¬ 
mo, vanno ad aggiungersi, uno dopo 
l'altro, nella variabile B$. Terminato il 
ciclo (linee 30-70) B$ conterrà la parola 
invertita e la si potrà quindi stampare. 
Come ultimo esempio vogliamo risolve¬ 
re questo problema: cercare se una 
stringa è contenuta in un'altra stringa 
(esempio la parola "carica’ è contenuta 
in "scaricatori", mentre 'mela" non ha 
nulla a che vedere con "pagina"). 
Vediamone innanzitutto una possibile 
soluzione 

10 INPUT'Q INSERISCI Là PRIMA 
STRINGA";A$ 

20 INPUT'INSERISCI LA SECONDA 
STRINGA";B$ 

30 LETL=LEN(B$) 

40 LET SPIA=0 
50 LETK-LEN(A$)-L 
60 IFKcOTHEN PRINT'TROPPO 
LUNGA! RIPETI": GOTO20 
70 FORI=1TOK+1 
80 LETC$=MID$(A$,I,L) 

90 IFC$=B$ THENLET SPIA= 1 
100 NEXTI 

110 IF SPIA=0 THENPRINT" Q LA 
SECODA STRINGA NON E' 
CONTENUTA NELLA PRIMA" 

: END 

120 PRINT' Q ' B$”E' CONTENUTA 
IN”;A$ 

Ed ecco alcuni commenti esplicativi. 
Righe 50-60: se la lunghezza di B$ 
risulta superiore a quella di A$, è chiaro 
che il confronto non può essere possibi¬ 
le. Occorre ripetere l'inserimento di B$. 
Righe 70-100: questo è il cuore del pro¬ 
gramma. Utilizzando la funzione MID$ si 
confrontano man mano i caratteri di A$ 
con quelli di B$. Nel caso in cui l'esito 
sia positivo (cioè B$ sia contenuto in 
A$), FLAG assume valore 1. 
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A9 

8E 

85 

2D 

15F1:16 

85 

04 

20 

79 

12 

20 

E4 

50 

1109:D0 

03 

40 

80 

OD 

60 

20 

86 

96 

1381:04 

A9 

90 

20 

D2 

FF 

E6 

04 

B1 

15F9:FF 

09 

00 

FC 

F9 

40 

16 

18 

EA 

1111 : OD 

B1 

FD 

18 

69 

01 

85 

76 

38 

1389:A5 

03 

18 

69 

90 

85 

03 

90 

BF 

1601:13 

05 

11 

FF 

06 

48 

45 

40 

42 

1119:A9 

15 

85 

75 

20 

7B 

OC 

91 

F5 

1391:02 

E6 

04 

CA 

DO 

FO 

40 

47 

E1 

1609:50 

OD 

FF 

11 

FE 

11 


11 

3A 

1121:A8 

20 

7B 

OC 

91 

AA 

20 

E4 

20 

1399:13 

20 

E4 

FF 

09 

00 

FO 

F9 

18 

1611:FF 

11 

FE 

11 

9D 

11 

FF 

11 

B4 

1129:12 

AO 

00 

B1 

B4 

FO 

03 

40 

53 

13A1:C9 

41 

30 

F5 

09 

56 

10 

FI 

10 

1619 :FE 

11 

9D 

11 

FF 

11 

FE 

11 

21 

1131:2F 

OD 

06 

7F 

FO 

OE 

A5 

B4 

BE 

13A9: 38 

E9 

40 

09 

10 

DO 

03 

40 

21 

1621:9D 

11 

FF 

11 

FE 

11 

9D 

11 

F9 

1139:38 

E9 

15 

85 

B4 

BO 

02 

06 

20 

13B1:E7 

13 

09 

07 

DO 

03 

40 

54 

B9 

1629 :FF 

11 

FE 

11 

9D 

11 

FF 

11 

CO 

1141:B5 

40 

2A 

11 

A5 

70 

85 

B4 

86 

13B9:15 

09 

08 

DO 

03 

40 

A4 

15 

92 

1631:FE 

11 

9D 

11 

FF 

11 

13 

11 

61 

1149:A5 

7D 

85 

B5 

AO 

00 

84 

7F 

37 

1301:09 

15 

DO 

03 

40 

5B 

16 

09 

22 

1639:11 

1F 

00 

13 

FE 

16 

11 

10 

75 

1151 : A4 

7F 

B1 

B2 

FO 

20 

48 

A5 

45 

1309:04 

DO 

03 

40 

66 

16 

09 

13 

7D 

1641:50 

52 

45 

53 

53 

20 

41 

4E 

F3 

1159:83 

FO 

06 

68 

09 

80 

40 

63 

07 

13D1:D0 

03 

40 

77 

16 

09 

12 

DO 

EE 

1649:59 

20 

4B 

45 

59 

20 

54 

4F 

2B 

1161:11 

68 

AO 

00 

91 

B4 

E6 

7F 

E6 

13D9:03 

40 

B1 

17 

09 

11 

DO 

03 

73 

1651:20 

43 

4F 

4E 

54 

49 

4E 

55 

E6 

1169:A5 

B4 

38 

E9 

15 

85 

B4 

BO 

OA 

13E1:40 

E5 

17 

40 

9A 

13 

A9 

20 

E3 

1659:45 

00 

A5 

84 

09 

01 

FO 

02 

5B 

1171:02 

06 

B5 

40 

51 

11 

A5 

83 

5F 

13E9:85 

FA 

AO 

00 

84 

F9 

91 

F9 

CE 

1661:06 

84 

40 

16 

18 

A5 

73 

09 

05 

1179:D0 

03 

40 

80 

OD 

60 

20 

86 

07 

13F1:C8 

DO 

FB 

E6 

FA 

A6 

FA 

EO 

E7 

1669:01 

FO 

08 

A5 

84 

09 

OA 

10 

1D 

1181 : OD 

A9 

01 

85 

76 

A9 

15 

85 

17 

13F9:22 

DO 

F3 

A9 

B8 

85 

03 

A9 

8B 

1671:02 

E6 

84 

40 

16 

18 

20 

F 4 

F3 

1189:75 

20 

7B 

OC 

91 

A8 

20 

7B 

89 

1401:14 

85 

04 

20 

79 

12 

20 

E4 

68 

1679:00 

A9 

46 

85 

03 

A9 

17 

85 

AF 

1191:00 

91 

AA 

20 

E4 

12 

A4 

7A 

A8 

1409 :FF 

09 

00 

FO 

F9 

09 

50 

FO 

3B 

1681:04 

20 

79 

12 

20 

B7 

16 

85 

F9 

1199:B1 

FD 

05 

84 

10 

06 

AO 

00 

EE 

1411:03 

40 

AA 

14 

A9 

01 

A2 

04 

FE 

1689:87 

A9 

65 

85 

03 

A9 

17 

85 

61 

HAI :B1 

B4 

FO 

03 

40 

2F 

OD 

06 

18 

1419 :AO 

00 

20 

BA 

FF 

A9 

00 

20 

08 

1691:04 

20 

79 

12 

20 

B7 

16 

85 

OA 

11A9:7F 

FO 

10 

06 

B5 

A5 

B4 

38 

10 

1421 :BD 

FF 

20 

CO 

FF 

A2 

01 

20 

E4 

1699:88 

20 

06 

16 

BO 

15 

A9 

86 

FF 

11B1:E9 

90 

85 

B4 

BO 

02 

06 

B5 

B9 

1429:09 

FF 

A9 

DO 

85 

03 

A9 

14 

DB 

16A1:85 

03 

A9 

17 

85 

04 

20 

79 

21 

11B9:4C 

9F 

11 

A5 

70 

85 

B4 

A5 

6F 

1431:85 

04 

20 

79 

12 

A2 

00 

BD 

CI 

16A9:12 

20 

E4 

FF 

09 

00 

FO 

F9 

AD 

11C1:7D 

85 

B5 

AO 

00 

84 

7F 

A4 

7A 

1439:30 

15 

95 

F9 

E8 

EO 

06 

DO 

BE 

16B1:40 

16 

18 

40 

E5 

16 

20 

E4 

FD 

11C9:7F 

B1 

B2 

FO 

22 

48 

A5 

83 

7E 

1441:F6 

20 

10 

18 

A9 

OD 

20 

D2 

86 

16B9:FF 

09 

41 

30 

F9 

09 

55 

10 

35 

11D1:F0 

06 

68 

09 

80 

40 

DA 

11 

87 

1449 :FF 

A9 

FB 

85 

03 

A9 

14 

85 

26 

1601:F5 

38 

E9 

40 

60 

AO 

00 

B1 

6F 

11D9:68 

AO 

00 

91 

B4 

E6 

7F 

06 

78 

1451:04 

20 

79 

12 

A2 

00 

BD 

42 

07 

1609:F9 

05 

84 

FO 

07 

08 

04 

74 

5D 

11E1:B5 

A5 

B4 

38 

E9 

90 

85 

B4 

B3 

1459:15 

95 

F9 

E8 

EO 

06 

DO 

F6 

F6 

16D1: DO 

F5 

18 

60 

B1 

A8 

05 

87 

30 

11E9:B0 

02 

06 

B5 

40 

08 

11 

A5 

66 

1461:20 

10 

18 

A9 

OD 

20 

D2 

FF 

CO 

16D9: DO 

F3 

B1 

AA 

05 

88 

DO 

ED 

20 

11F1:83 

DO 

03 

40 

80 

OD 

60 

20 

48 

1469:A9 

16 

85 

03 

A9 

15 

85 

04 

4A 

16E1:84 

7A 

38 

60 

A4 

7A 

B1 

2D 

9B 

11F9:86 

OD 

A9 

01 

85 

76 

A9 

15 

56 

1471:20 

79 

12 

A2 

00 

BD 

48 

15 

11 

16E9: DO 

11 

20 

86 

OD 

20 

E4 

12 

F3 

1201:85 

75 

20 

7B 

OC 

91 

A8 

20 

19 

1479:95 

F9 

E8 

EO 

06 

DO 

F6 

20 

97 

16F1:20 

FF 

16 

A4 

7A 

A9 

01 

91 

49 

1209:7b 

OC 

91 

AA 

20 

E4 

12 

A9 

2D 

1481:10 

18 

A9 

OD 

20 

D2 

FF 

A9 

B9 

16F9:2D 

E6 

79 

40 

B1 

16 

A4 

7A 

14 

1211:0A 

E5 

84 

85 

81 

A4 

7A 

E6 

17 

1489:31 

85 

03 

A9 

15 

85 

04 

20 

27 

1701 :B1 

FB 

09 

01 

DO 

03 

40 

FD 

79 

1219:81 

B1 

FD 

05 

81 

10 

06 

AO 

7F 

1491:79 

12 

A2 

00 

BD 

4E 

15 

95 

36 

1709 : OD 

09 

02 

DO 

03 

40 

70 

OE 

B5 

1221:00 

B1 

B4 

FO 

03 

40 

2F 

OD 

OC 

1499:F9 

E8 

EO 

06 

DO 

F6 

20 

10 

34 

1711:09 

03 

DO 

03 

40 

EA 

OE 

09 

23 

1229:06 

7F 

FO 

10 

E6 

B5 

A5 

B4 

BD 

14A1:18 

A9 

OD 

20 

D2 

FF 

20 

A3 

5E 

1719:04 

DO 

03 

4F 

62 

OF 

09 

05 

8A 

1231:18 

69 

90 

85 

B4 

90 

02 

E6 

F8 

14A9:18 

A9 

OD 

20 

D2 

FF 

20 

E7 

AA 

1721:D0 

03 

40 

DD 

OF 

09 

06 

DO 

50 

1239 :B5 

40 

20 

12 

A5 

70 

85 

B4 

4F 

14B1:FF 

20 

CO 

FF 

40 

16 

18 

13 

79 

1729:03 

40 

53 

10 

09 

07 

DO 

03 

66 

1241 :A5 

7D 

85 

B5 

AO 

00 

84 

7F 

31 

14B9:FE 

16 

11 

10 

43 

48 

45 

43 

D3 

1731:40 

D3 

10 

09 

08 

DO 

03 

40 

EE 

1249:A4 

7F 

B1 

B2 

FO 

22 

48 

A5 

47 

1401:4B 

20 

50 

52 

49 

4E 

54 

45 

38 

1739:45 

11 

09 

09 

DO 

03 

40 

BC 

FF 

1251:83 

FO 

06 

68 

09 

80 

40 

5B 

F8 

1409:52 

20 

50 

52 

45 

53 

53 

20 

93 

1741:11 

40 

3D 

12 

60 

13 

FE 

16 

37 

1259:12 

68 

AO 

00 

91 

B4 

E6 

7F 

61 

14D1:50 

20 

54 

4F 

20 

50 

52 

49 

D9 

1749:11 

10 

45 

4E 

54 

45 

52 

20 

11 

1261:E6 

B5 

A5 

B4 

18 

69 

90 

85 

73 

14D9:4E 

54 

00 

40 

41 

59 

45 

52 

4F 

1751:53 

54 

41 

52 

54 

49 

4E 

47 

37 

1269 :B4 

90 

02 

E6 

B5 

40 

49 

12 

3E 

14E1:20 

31 

30 

FF 

16 

40 

41 

59 

2A 

1759:20 

52 

4F 

57 

20 

28 

41 

2D 

DO 

1271 :A5 

83 

DO 

03 

40 

80 

OD 

60 

72 

14E9:45 

52 

20 

39 

FF 

17 

40 

41 

17 

1761:54 

29 

20 

00 

13 

FE 

16 

11 

D9 

1279:A9 

01 

85 

82 

8A 

48 

AO 

00 

42 

14F1:59 

45 

52 

20 

38 

OD 

00 

FF 

5A 

1769:45 

4E 

54 

45 

52 

20 

53 

54 

BA 

1281:B1 

03 

FO 

1D 

09 

FF 

FO 

10 

AB 

14F9:OA 

00 

40 

41 

59 

45 

52 

20 

69 

1771:41 

52 

54 

49 

4E 

47 

20 

43 

07 

1289:09 

FE 

FO 

37 

20 

D2 

FF 

18 

48 

1501:37 

FF 

17 

40 

41 

59 

45 

52 

BA 

1779:4F 

40 

55 

4D 

4E 

20 

28 

41 

66 

1291:A5 

03 

69 

01 

85 

03 

A5 

04 

02 

1509:20 

36 

FF 

17 

40 

41 

59 

45 

Al 

1781:2D 

54 

29 

20 

00 

13 

FE 

16 

E2 

1299:69 

00 

85 

04 

E6 

82 

40 

7F 

08 

1511:52 

20 

35 

OD 

00 

40 

41 

59 

FO 

1789:11 

4E 

4F 

20 

4D 

41 

54 

43 

1B 

12A1:12 

68 

AA 

60 

08 

B1 

03 

AA 

83 

1519:45 

52 

20 

34 

FF 

17 

40 

41 

F7 

1791:48 

20 

20 

20 

20 

20 

50 

52 

66 

12A9:A9 

20 

20 

D2 

FF 

CA 

FO 

03 

EB 

1521:59 

45 

52 

20 

33 

FF 

17 

40 

A9 

1799:45 

53 

53 

20 

41 

4E 

59 

20 

CI 

12B1:4C 

AB 

12 

A5 

03 

18 

69 

02 

D6 

1529:41 

59 

45 

52 

20 

32 

OD 

00 

FB 

17A1:4B 

45 

59 

20 

54 

4F 

20 

43 

57 

12B9:85 

03 

A5 

04 

69 

00 

85 

04 

AD 

1531:FF 

1E 

40 

41 

59 

45 

52 

20 

25 

17A9:4F 

4E 

54 

49 

4E 

55 

45 

00 

84 

12C1:4C 

7F 

12 

08 

B1 

03 

AA 

08 

75 

1539:31 

OD 

00 

10 

9E 

80 

90 

FO 

61 

17B1:A9 

CD 

85 

03 

A9 

17 

85 

04 

8E 

12C9:B1 

03 

20 

D2 

FF 

CA 

FO 

03 

F8 

1541:9A 

60 

99 

DO 

97 

40 

96 

BO 

AC 

17B9:20 

79 

12 

20 

E4 

FF 

09 

00 

55 

12D1:4C C9 

12 

A5 

03 

18 

69 

03 

7F 

1549:94 

20 

93 

90 

91 

00 

20 

00 

OE 

1701:F0 

F9 

09 

52 

DO 

03 

40 

6A 

DA 

12D9:85 

03 

A5 

04 

69 

00 

85 

04 

CD 

1551:90 

00 

20 

A9 

80 

85 

03 

A9 

OE 

1709:0A 

40 

16 

18 

13 

FE 

16 

11 

26 

12E1:40 

7F 

12 

A4 

7A 

B1 

A8 

A8 

2D 

1559:15 

85 

04 

20 

79 

12 

20 

E4 

43 

17D1:10 

50 

52 

45 

53 

53 

20 

52 

3B 

12E9:88 

FO 

10 

18 

A5 

B4 

69 

14 

F8 

1561:FF 

09 

00 

FO 

F9 

09 

47 

FO 

83 

17D9:20 

54 

4F 

20 

52 

45 

53 

54 

BB 
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Listing 


17E1:41 

52 

54 

00 

A9 

01 

85 

C3 

EF 

17E9:A9 

18 

85 

C4 

20 

79 

12 

20 

1B 

17F1:E4 

FF 

C9 

00 

FO 

F9 

C9 

51 

20 

17F9: DO 

03 

4C 

E2 

FC 

4C 

16 

18 

66 

1801:13 

FE 

16 

11 

1C 

50 

52 

45 

5A 

1809:53 

53 

20 

51 

20 

54 

4F 

20 

E1 

1811:51 

55 

49 

54 

00 

20 

2B 

OC 

90 

1819:4C 

9A 

13 

A2 

00 

AO 

00 

B1 

D6 

1821:F9 

20 

87 

18 

C8 

CO 

14 

DO 

OB 

1829:F6 

A9 

F8 

85 

C3 

A9 

14 

85 

29 

1831:C4 

20 

79 

12 

AO 

00 

B1 

FB 

80 

1839:20 

87 

18 

C8 

CO 

14 

DO 

F6 

D9 

1841:A9 

F8 

85 

C3 

A9 

14 

85 

C4 

DE 

1849:20 

79 

12 

AO 

00 

B1 

FD 

20 

17 

1851:87 

18 

C8 

CO 

14 

DO 

F6 

E8 

2B 

1859:E0 

14 

DO 

06 

A9 

OD 

20 

D2 

OE 

1861:FF 

60 

A5 

F9 

18 

69 

14 

85 

12 

1869:F9 

90 

02 

E6 

FA 

A5 

FB 

18 

E7 

1871:69 

14 

85 

FB 

90 

02 

E6 

FC 

23 

1879:A5 

FD 

18 

69 

14 

85 

FD 

90 

D8 

1881:02 

E6 

FE 

4C 

1E 

18 

48 

29 

1C 

1889:80 

F0 

05 

A9 

12 

20 

D2 

FF 

28 

1891:68 

48 

29 

7F 

20 

D2 

FF 

68 

D9 

1899:29 

80 

F0 

05 

A9 

92 

20 

D2 

97 

18A1:FF 

60 

AO 

00 

84 

7C 

84 

FB 

19 

18A9:A9 

80 

85 

FC 

A9 

AO 

85 

F9 

24 

18B1:A9 

8C 

85 

FA 

A4 

7C 

B1 

F9 

AE 

18B9:D0 

01 

60 

AO 

00 

B1 

FB 

DO 

38 

18C1:02 

A9 

2E 

20 

D2 

FF 

C8 

CO 

OE 

18C9:0F 

DO 

F2 

A9 

28 

20 

D2 

FF 

16 

18D1:A4 

7C 

B1 

F9 

C9 

OA 

FO 

08 

A9 

18D9:48 

A9 

00 

AA 

20 

CD 

BD 

68 

5F 

18E1:AA 

A9 

00 

20 

CD 

BD 

A9 

29 

B5 

18E9:20 

D2 

FF 

E6 

7C 

A9 

20 

20 

38 

18F1:D2 

FF 

A5 

FB 

69 

10 

85 

FB 

92 

18F9:90 

02 

E6 

FC 

4C 

B5 

18 

00 

09 


ALARMCALC 

10 IFA=OTHENA=1:LOAD"ALARM 

CALC.ML",8,1 

20 POKE53280,0 :POKE53281,0 

30 TT$="(CLR)(SH A)LARM(SH C} 

(SH AHSH L}{SH C) (C) 1991 
(SH C)(SH 0)(SH M)(SHP) 

(SH U((SH T((SH E)(SHP) 
UBLICATIONS(CUR.GIU)" 

40 PRINTCHRS(14);CHR$(154); 

TTS 

50 INPUT"HOUR,MINUTE, 

AMPM'';H,M,A$ 

60 H%=H/10:HH=H%*16+H-H%*10- 

128* <LEFT$(A$,1)="P") 

:IFH=12THENHH=164-HH 
65 POKE56331,HH 

70 M%=M/10:POKE56330, 

(M% *16 +M-M% *10) :POKE 
56329,0:POKE56328,0 
80 PRINTTTS:PRINTTAB(3); 

"(SH U)SE (SH C)(SH R) 

(SH S)(SH R) KEYS TO MOVE 
HIGHLIGHT,(CUR.GIU)" 

85 PRINT"(SH Q) TO QUIT/ 

RESET, + - (SH S)(SH H) 

(SH I){SH F)(SH T) TO SET 
TIMES(CUR.GIU)" 

90 PRINTTAB(14);"(CBM A) 

(9 SH *)(CBM S)" 

100 PRINTTAB(14);"(SH-> 

00:00:00 (SH A)(SH -)" 

110 PRINTTAB(14)(CBM Z) 

(9 SH *)(CBM X)" 

120 PRINT"(CBM A)(8 SH * 

(CBM R)(5 SH *)(CBM R 
(8 SH *)(CBM R)(13 SH*) 
(CBM S)" 

130 PRINT"(SH -} (SH S)TART 

*(SH -)(SH T}IME (SH -) 

(SH S)TOP(2 SPC)*{SH -) 


(4 SPC)(SH M)EMO{5 SPC) 

(SH -)" 

140 PRINT"(CBM Q><6 SH *} 

(CBM R)(SH *)(SH +) 

(5 SH *)(SH + ) ( 6 SH *} 

(CBM R)(SH *)(SH +) 

(13 SH *}(CBM W>" 

150 FORR—1T09 

160 IF(RAND1)THENPRINT"{SH -} 

12:00(SH A) (SH -)(SH X) 
(SH -)00:00(SH -)12:00 
(SH A)(SH -)(SH X)(SH -) 
(13 SPC)(SH -)* :GOTO180 
170 PRINT"(CBM Q)(6 SH *> 

(SH +)(SH *)(SH +)(5 SH *) 
(SH +)(6 SH *){SH +)(SH *) 
(SH +)(13 SH *)(CBM W)" 

180 NEXT 

190 PRINT"(CBM Z)(6 SH *) 

(CBM E)(SH *)(CBM E) 

(5 SH *)(CBM E)(6 SH *) 
(CBM E)(SH *}(CBM E) 

(13 SH *)(CBM X)(CUR.GIU)" 
200 PRINT"(2 SPC)* (SH X) 
=OFF, (SH F)=(SH F)LASH, 
(SH B)-(SH B)ELL AND 
(SH F)LASH" 

210 POKE650,128:SYS49365 

:POKE650,0' 
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MLX 


LISTATO DI C64 MLX II ESA 


MLX è un programma che permette di introdurre listati 
in linguaggio macchina senza errori, 
per C 64 e C 128 in modo 64. 


Quando bisogna introdurre un pro¬ 
gramma , della nostra rivista scritto in 
linguaggio macchina, bisogna carica¬ 
re e dare il RUN al programma MLX II. 
Gli indirizzi richiesti si possono legge¬ 
re nell’articolo che accompagna il 
programma formato MLX. 

Se siete “digiuni” di linguaggio mac¬ 
china questi indirizzi ( e tutti gli altri 
valori da introdurre ) possono appari¬ 
re strani. Invece questi numeri sono 
ropri del sistema esadecimale a 
ase 16 comunemente usato appunto 
per i programmi in linguaggio macchi¬ 
na. Il sistema esadecimale include i 
numeri da 0 a 9 e le lettere da A a F. 
Dopo aver introdotto l'indirizzo inizia¬ 
le e finale viene offerta l’opzione per 
pulire I’ area di lavoro con tutti zeri. 

A questo punto apparirà sul video il 
menu. 

Per introdurre un programma bisogna 
scegliere la prima opzione cioè: im¬ 
mettere dati. 

Premendo la lettera I verrà richiesto 
l’indirizzo della prima linea. 

Se il programma in parte è stato digi¬ 
tato, bisogna assicurarsi di aver cari¬ 
cato quella parte, scegliere la prima 
opzione e digitare il numero di linea 
della rimanente parte da introdurre. 
Bisogna sempre assicurarsi che l’indi¬ 
rizzo immesso corrisponda a quello 
della linea del listato, altrimenti i dati 
non vengono accettati. 

Per tornare al menu basta premere 
RETURN da qualsiasi opzione. 

Le linee da introdurre sono composte 
da nove cifre, le prime otto sono dati, 
l’ultima è il checksum. Se la linea è 
stata introdotta in modo corretto verrà 
emesso un beep ed il programma 
passerà alla linea successiva, vice¬ 
versa la linea non verrà accettata. 
Altro vantaggio di MLX è quello di non 
dover introdurre il numero di linea. 

Il checksum di MLX è molto potente, 
se si digita AO invece di OA questo 
viene notato ed apparirà il messaggio 
di errore. Al contrario, se si immette 
FF invece di 00 e viceversa, non viene 
notato, per cui questo è l’unico caso 
limite e naturalmente bisogna fare 


attenzione. Per cancellare un errore 
di battitura si deve usare il tasto INST/ 
DEL o il cursore verso sinistra. 

Il tasto RETURN funziona solo prima 
di digitare qualche dato della linea. 

Il tasto CLR/HOME pulisce la linea 
dopo aver visto il messaggio di errore. 
La seconda opzione del menu riguar¬ 
da la visualizzazione dei dati. 
Quando si preme V viene chiesto 
l'indirizzo iniziale: questa opzione 
mostra tutti i dati da tale indirizzo fino 
alla fine della memoria, dopodiché il 
menu viene visualizzato. 

Per fare una pausa durante la visua¬ 
lizzazione dei dati bisogna premere la 
barra spazio, così pure per tornare 
alla visualizzazione. 

Con RETURN si torna al menu. 

Altre due opzioni sono di LOAD e di 
SAVE di un programma. 
Naturalmente è possibile registrare o 
salvare su disco o su nastro. 

Quando si salva un programma biso¬ 
gna sempre usare nomi differenti. 
MLX riporta tutti i messaggi standard 
del Commodore 64. 
ed in più include altri tre messaggi: 

1) INDIRIZZO INIZIALE ERRATO. 
questo significa che il programma che 
si tenta di caricare non inizia all’ indi¬ 
rizzo specificato all’inizio quando si è 
fatto girare MLX. 

2) CARICAMENTO FINITO a indiriz¬ 
zo..., questo messaggio significa che 
il programma che si prova di caricare 
finisce prima dell'indirizzo finale intro¬ 
dotto quando viene dato il RUN. 

3) FINITO ALL’ INDIRIZZO FINALE , 
questo messaggio significa che il pro¬ 
gramma che si tenta di caricare finisce 
oltre all'indirizzo finale specificato all¬ 
’inizio. 

Se si incontra uno di questi errori 
bisogna uscire da MLX tornando al 
BASIC, con l’opzione FINE, dare il 
RUN e immettere i giusti indirizzi. 

Se si digita un programma lungo è 
consigliabile salvare, caricare e verifi¬ 
care frequentemente. Per far partire il 
programma digitato su MLX bisogna 
far riferimento all’articolo del pro¬ 
gramma. 
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10 REM MLX II ESADECIMALE 
100 POKE56,50 :CLR:DIMINS,I,J, 

A, B, A$, B$,A(7) , N$ 

110 C4=48:C6=16:C7=7:Z2-2: 

Z4=254 :Z5=255:26=256 :Z7=127 
120 FA-PEEKI45)+Z6*PEEK(46): 
BS“PEEK(55)+Z6*PEEK(56) 

:H$="0123456789ABCDEF" 

130 R$=CHR$(13):L$-"(CUR.SIN(" 

:S$=" ”:D$=CHR$(20):Z$-CHR$ 
(0):T$="(13 CUR.DES)" 

140 SD=54272:FOR I=SD TO 

SD+23:POKE 1,0:NEXT:POKE 
SD+24,15 :POKE 788,52 
150 PRINT"(CLR)"CHR$(142)CHRS 
(8):POKE 53280,15:POKE 
53281,15 

160 PRINT T$" (REDMRVS ON)(2 

SPC)(8 CBM@)(2SPC)"SPC(28)" 
(2 SPCHRVS OFF) (BLUE) MLX 
II (RED)(RVS ON)(2 SPC)" 

SPC(28)"(12 SPC)(BLUE)" 

170 PRINT"(3 CUR.GIU)(3 SPC) 

COMPUTE!'S MACHINE LANGUAGE 
EDITOR)3 CUR.GIU)" 

180 PRINT")BLACK(STARTING 

ADDRESS)GRATI)”;:GOSUB300 
:SA-AD:GOSUB1040:IF F 
THEN180 

190 PRINT")BLACK)(2 SPCJENDING 

ADDRESS(GRAY1)";:GOSUB300 
:EA=AD:GOSUB1030:IFF 
THEN190 

200 INPUT")3 CUR.GIU)(BLACK) 
CLEAR WORKSPACE [Y/N] 

)GRAY1)";AS:IF LEFT$(A$,1) 
<>"Y"THEN220 

210 PRINT"{2 CUR.GIU){BLUE) 

WORKING...:FORI=BS TO 
BS+EA-SA+7:POKE 1,0:NEXT 
:PRINT"DONE" 

220 PRINTTÀB(10)"(2 CUR.GIU) 

(BLACK)(RVSON) MLX COMMAND 
MENU (CUR.GIU){GRAY1)" 

:PRINT T$"(RVS ON)E(RVS 
OFF)NTER DATA" 

230 PRINT TS"(RVS ON)D(RVS 
OFF}ISPLAY DATA":PRINT 
T$")RVS ON)L(RVS OFF)OAD 
FILE" 

240 PRINT T$"(RVS ON)S(RVS 
OFF)AVE FILE":PRINT T$" 
(RVSON)Q(RVS OFF)UIT(2 
CUR.GIU)(BLACK)" 

250 GET A$:IF AS=N$ THEN250 
260 A=0:FOR 1-1 TO 5:IF A$= 

MID$(”EDLSQ",1,1)THEN A=I 
: 1=5 

270 NEXT:ON A GOTO420,610,690, 

700,280:GOSUB1060:GOTO250 
280 PRINT"(RVS ON) QUIT ” 

: INPUT"(CUR.GIU)(GRAYl)ARE 
YOU SURE (Y/N)";AS:IF LEFTS 
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(A$,l)O"Y"THEN220 
290 POKE SD+24,0:END 
300 IN$=N$:AD=0:INPUTIN$ 

:IFLEN(IN$)04THENRETURN 
310 BS=INS:GOSÙB320:AD=A 

:BS=MID$<IN$,3):GOSUB320: 
AD=AD* 2 5 6 +A: RETURN 
320 A=0:FOR J=1 TO 2:A$=MID$ 

(B$, J, 1) :B=ASC(A$)-C4 + 
(A$>"@")*C7:A=A*C6+B 
330 IF B<0 OR B>15 THEN AD=0 
:A=-1:J=2 
340 NEXT:RETURN 
350 B=INT(A/C6):PRXNT MIDS 

(H$,B+l,1); :B=A-B*C6:PRINT 
MIDS(H$,B+l,1) ; : RETURN 
360 A=INT(AD/Z6):GOSUB350:A=AD- 
A*Z6:GOSUB350:PRINT": "; 

370 CK=INT (AD/Z6):CK=AD-Z4*CK 
+Z5*(CK>Z7):GOTO390 
380 CK=CK*Z2+Z5*(CK>Z7)+A 
390 CK=CK+Z5*(CK>Z5):RETURN 
400 PRINT"(CUR.GIU)STARTING 

AT{GRAY1):GOSUB300:IF 
IN$ON$ THEN GOSUB1030 : IF F 
THEN400 
410 RETURN 

420 PRINT"(RVS ON) ENTER DATA " 

:GOSUB400:IF IN$=N$ THEN220 
430 OPEN3,3:PRINT 
440 POKE198,0:GOSUB360:IF F 

THEN PRINT IN$:PRINT" 

(CUR.SU){5 CUR.DES)"; 

450 FOR 1=0 TO 24 STEP 3:B$=S$ 

:FOR J=1 TO 2 :IF F THEN BS 
=MID$(IN$,I+J,1) 

460 PRINT"(RVS ON)"B$L$;:IF I 

<24THEN PRINT"{RVS OFF)"; 
470 GET A$:IF A$=N$ THEN470 
480 IF(A$>"/"ANDA$<”:")OR 

(A$>"@"ANDA$<”G")THEN540 

485 A=-(A$="M")-2*(A$=",")- 
3*(A$=".")-4*(A$="/">-5 
*(A$="J")-6*(A$="K") 

486 A=A-7*(A$="L")-8*(A$=":")- 
9*(A$="U")-10*(A$="I")-11 
*<A$="0")-12*(A$="P") 

487 A=A-13*(A$=S$):IF A THEN 
A$=MID$("ABCD123E456F0", 

A,1):GOTO 540 

490 IF A$=R$ AND((1=0)AND(J=1) 
OR F)THENPRINT B$;:J=2 
:NEXT: 1=24:GOTO550 
500 IF A$="{HOME)" THEN PRINT 
B$ : J=2:NEXT: 1=24:NEXT 
:F=0:GOTO440 

510 IF(A$="(CUR.DES)")ANDF 

THENPRINT B$L$;:GOTO540 
520 IF A$OL$ AND AS<>D$ OR 
((1=0)AND(J=1))THEN 
GOSUB1060:GOTO470 
530 A$=L$+S$+L$:PRINT B$L$; 

:J=2-J:IF J THEN PRINT 
L$;: 1=1-3 

540 PRINT A$;:NEXT J:PRINT S$; 
550 NEXT I:PRINT:PRINT 

"(CUR.SU)(5 CUR.DES}"; 

:INPUT#3,IN$:IF IN$=N$ THEN 
CLOSE3:GOTO220 


560 FOR 1=1 TO 25 STEP3 

:B$=MID$(IN$,I):GOSUB320:IF 
I<25 THEN GOSUB380:A(1/3)=A 
570 NEXT : IF AOCK THEN GOSUB 

1060:PRINT"(BLACK)(RVS ON) 
ERROR: REENTER LINE 
•> ( GRAY1 ) " : F=1 : GOTO440 

580 GOSUB1080:B=BS+AD-SA:FOR 

1=0 TO 7;POKE B+I,A(I):NEXT 
590 AD=AD+8:IF AD>EA THEN 
CLOSE3:PRINT"(CUR.GIU) 
(BLUE)** END OF ENTRY 
**(BLACK)(2 CUR.GIU)" 
:GOTO700 

600 F=0:GOT04 4 0 

610 PRINT"(CLR)(CUR.GIU)(RVS 

ON) DISPLAY DATA ":GOSUB400 
:IF IN$=N$ THEN220 
620 PRINT"(CUR.GIU)(BLUE)PRESS : 

(RVS ON)SPACE(RVS OFF) TO 
PAUSE, (RVS ON)RETURN(RVS 
OFF) TO BREAK(GRAY1) 

(CUR.GIU}" 

630 GOSUB360:B=BS+AD-SA:FORI 

=BTO B+7:A=PEEK(I):GOSUB350 
:GOSUB380:PRINT S$; 

640 NEXT:PRINT"(RVS ON}"; 

:A=CK:GOSUB350:PRINT 
650 F=1:AD=AD+8:IF AD>EA 

THENPRINT"(CUR.GIU)(BLUE)** 
END OF DATA **":GOTO220 
660 GET A$:IF A$=R$ THEN 
GOSUB1080:GOTO220 
670 IF A$=S$ THEN F=F+1 
:GOSUB1080 

680 ONFGOTO630,660,630 
690 PRINT"(CUR.GIU}(RVS ON) 

LOAD DATA « :OP=l:GOTO710 
700 PRINT"(CUR.GIU)(RVS ON) 

SAVE FILE *:OP=0 
710 IN$=N$: INPUT"(CUR.GIU) 

FILENAME(GRAY1)";IN$:IF 
IN$=N$ THEN220 
720 F=0:PRINT"(CUR.GIU) 

(BLACK)(RVS ON}T(RVS OFF) 
APE OR (RVS ON)D(RVS OFF) 
ISK: (GRAY1}"; 

730 GET A$:IF A$="T"THEN 

PRINT"T(CUR.GIU)":GOTO880 
740 IF A$<>"D"THEN730 
750 PRINT"D(CUR.GIU)":OPEN15, 

8,15,"10 :":B=EA-SA:IN$= 

"0 :"+IN$:IF OP THEN810 
760 OPEN 1,8,8,IN$+",P,W":GOSUB 
860:IF A THEN220 
770 AH=INT(SA/256):AL-SA-(AH* 
256):PRINT#1,CHR$(AL); 

CHR$(AH); 

780 FOR 1=0 TO B:PRINT01,CHR$ 

(PEEK(BS+I)); :IF ST THEN800 
790 NEXT:CLOSE1:CLOSE15:GOTO940 

800 GOSUB1060:PRINT"(CUR.GIU) 

(BLACK)ERROR DURING SAVE 
:(GRAY1)":GOSUB860:GOTO220 
810 OPEN 1, 8, 8,IN$+",P, R" 
:GOSUB860:IF A THEN220 
820 GET#1,A$,B$:AD=ASC(A$+Z$) 
+256*ASC(BS+ZS) : IF ADOSA 
THEN F=l:GOTO850 


830 FOR 1=0 TO B:GET#1,A$:POKE 
BS+I, ASC (AS + ZS) : IF (IOB) AND 
ST THEN F=2:AD=I:I=B 
840 NEXT:IF ST<>64 THEN F=3 
850 CLOSE1:CLOSE15:ON ABS 
(F>0)+1 GOTO960,970 
860 INPUT#15,A,A$:IF A THEN 

CLOSE1:CLOSE15:GOSUB1060 
:PRINT"(RVS ON)ERROR: "A$ 
870 RETURN 

880 POKE183,PEEK(FA+2):POKE187, 
PEEK(FA+3): POKE188,PEEK 
(FA+4):IFOP=0THEN920 
890 SYS 63466:IF(PEEK(783) 

AND1)THEN GOSUB1060:PRINT" 
(CUR.GIU)(RVS ON) FILE NOT 
FOUND “:GOTO690 
900 AD=PEEK(829)+256*PEEK 

(830) :IF ADOSA THEN F=1 
:GOTO970 

910 A=PEEK(831)+256*PEEK(832)- 
1:F=F-2*(A<EA)-3*(A>EA) 

:AD-A-AD:GOTO930 
920 A=SA:B=EA+1 :GOSUB1010 

:POKE780,3:SYS63338 
930 A=BS:B=BS+(EA-SA)+1 :GOSUB 

1010:ON OP GOTO950 
: SYS 63591 

940 GOSUB1080:PRINT"{BLUE)** 

SAVE COMPLETED **":GOTO220 
950 POKE147,0 : SYS 63562:IF ST>0 

THEN970 

960 GOSUB1080:PRINT"(BLUE)** 

LOAD COMPLETED **":GOTO220 
970 GOSUB1060:PRINT"(BLACK)(RVS 
ON)ERROR DURING LOAD 
:(CUR.GIU)(GRAY1)":ON F 
GOSUB980,990,1000:GOT0220 
980 PRINT"INCORRECT STARTING 

ADDRESS (";:GOSUB360 
:PRINT")":RETURN 
990 PRINT"LOAD ENDED AT *; 

:AD=SA+AD:GOSUB360:PRINT D$ 
: RETURN 

1000 PRINT"TRUNCATED AT ENDING 
ADDRESS":RETURN 

1010 AH=INT(A/256):AL=A-(AH*256) 

:POKE193,AL:POKE194,AH 
1020 AH=INT(B/256):AL=B-(AH*256) 

:POKE174,AL:POKE175,AH 
:RETURN 

1030 IF AD<SA OR AD>EA THEN1050 
1040 IF(AD>511 AND AD<40960)OR 
(AD>49151AND AD<53248)THEN 
GOSUB108 0 :F=0: RETURN 
1050 GOSUB1060:PRINT"(RVS ON) 
INVALID ADDRESS (CUR.GIU) 

(BLACK)":F=1: RETURN 
1060 POKE SD+5,31 :POKE SD+6,208 
:POKE SD,240:POKE SD+1,4 
:POKE SD+4,33 
1070 FOR S=1 TO 100:NEXT 
:GOTO1090 

1080 POKE SD+5,8:POKE SD+6,240 
:POKE SD,0 :POKE SD+1,90 
:POKE SD+4,17 

1090 FOR S=1 TO 100:NEXT:POKE 
SD+4,0 :POKE SD,0 :POKE 
SD+1,0:RETURN 
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SUPER COMMODORE C64/128 



CM1.1/1 


Uso avanzato del Commodore 64 







,m^°' 




Riparare da soli 
il proprio C64 


SUL MEDESIMO ARGOMENTO 


INDICARE CHIARAMENTE CODICI E QUANTITÀ 1 DEI VOLUMI RICHIESTI 

Codice 

Qta 

Codice 

Qta 

Codice 

Qta 

Codice 

Qta 

Codice 

Qta 












AA. VV. 

GRAFICA E SUONO 
Per il C64 ■ CI28- 
C64 Personal Computer 
Cod.CC658 pp.394 L.3S.000 
Libro con floppy disk 5 1/4" 


M. England 0.Lawrence 

il lesto permette di acquisire 
senza fatica le tecniche avan¬ 
zate di programmazione in As¬ 
sembler su C64. Il dischetto con¬ 
tiene i programmi del testo 
Cod.572D pp 208 L.35.000 
Libro con floppy disk 5 1/4" 


Risorse per le didattica 

IMPARA CON IL 
COMMODORE 64 
Risolvi i tuoi esercizi con il 
computer 

Cod.CC958 pp.334 L.29.000 

Libro con floppy disk 5 1/4" 


li Ordine minimo L. 60 000 » L. 5 000 per contributo (isso spese di spedizione 

□ Sono titolare della Jackson Card'92 n”: I I I I I I I e ho daino allo sconto del 10% ( 

□ Non sono titolare '—— * —‘l—I -1 (lino al 31/12/92) 

| MODALITÀ DI PAGAMENTO: 

□ Contro Assegno posiate □ Versamento di L (incluso spese postali) sul 

eie postale 11666203 intestato a Gruppo Editoriale Jackson • Milano e allego fotocopia delta ricevuta. 

I □ Assegno allegato n*_di Urt_ 




turaci btev 0 gialle 

Z8S»j22&e»~- 

tecniche (vO0 

T a frr 7 49 


Art Margolls 

Illustra in modo semplice ed 
accessibile a tutti le tecniche per 
la ricerca dei guasti, dando la 
possibilità di risolvere almeno la 
metà dei problemi che si presen - 
tano sul Commodore 64. 
Cod.CC564 pp.496 L.55.000 


Totomac 

Dedicato sia ai sistemisti che ai 
iocatori occasionali, il testo al¬ 
iata in modo semplice ed effi¬ 
cace la compilazione dei sistemi 
Totocalcio. 

Cod.576D pp.128 L.29.000 

Libro con cassetta per C64 


gio 

froi 


Boris Allan 

La grafica in alta risoluzione non 
ò più un mistero: questo testo 
inlatti attraverso la spiegazione 
di una serie di routine, dà la 
possibilità di apprendere tecni¬ 
che di programmazione grafica. 
Cod.573D pp.152 L.15.000 


Da spedire in busta chiusa a GRUPPO EDITORIALE JACKSON, Via Rosellini 12-20124 

Si, iniziatemi i volumi sottoelencati 


Milano 


David Lawrence 
TECNICHE DI 
PROGRAMMAZIONE SUL 
COMMODORE 64 

Cod.575D pp.176 L.16.500 


Czes Kosnlowskl 
MATEMATICA E 
COMMODORE 64 
Cod.570D pp.160 L.26.500 

Libro con cassetta per C64 


(incluso spese postali) Banca__ 

-J Carta di credito: O Visa O American Express O DinersClub O Carta Si 

Autorizzo l'organizzazione sopra indicata ad addebitare l'importo di L._ 

(incluso spese postali) sulla carta di credito n”:_ 



I 


Data di scadenza della caria di credito:_ 

□ Richiedo l'emissione della ricevuta (formula riservata alle aziende) 

e comunico il numero di partita IVA:_ 

Nome e Cognome_ 

Via_ n°_ 

Cap_Città_Prov. 
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